philippelh/bitchx
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
b102b9d5c9d08f92d22f1e42706c9d673d4abe52
bitchx/source/pmbitchx.c
Kevin Easton 70ac43ce77 Remove globals 'li' and 'co' in term.c 
These globals were used to store the original terminal dimesions from the terminal database (or
in the case of reattaching, supplied by scr-bx) to be applied if the current terminal dimensions
could not be determined.

Instead, we leave the original terminal dimensions in current_term->TI_lines and current_term->TI_cols,
and create current_term->li and current_term->co to store the current terminal dimensions (as eg.
supplied by scr-bx).
2017-09-15 17:15:24 +10:00

3743 lines
91 KiB
C
Raw Blame History

/* pmbitchx.c Written by: Brian Smith (NuKe) and rosmo for BitchX */
#include <sys/stat.h>
/* These headers from the Warp 4 toolkit */
#include <os2/mciapi.h>
#include <os2/mcios2.h>
#include <io.h>
#include <stddef.h>
/* We now require dynamic windows */
#include <dw.h>
#include "window.h"
#include "gui.h"
#include "server.h"
#include "hook.h"
#include "list.h"
#include "commands.h"
#include "hash2.h"
#include "status.h"
/* Window data, located at QWP_USER */
typedef struct {
HVPS hvps;
Screen *screen;
} MYWINDATA, *PMYWINDATA;
int VIO_staticx=200;
int VIO_staticy=100;
int VIO_font_width=6;
int VIO_font_height=10;
int cxvs, cxsb, cysb, cytb;
/* These are for $lastclickline() function */
char *lastclicklinedata = NULL;
int lastclickcol, lastclickrow;
/* These are for the context menu */
HWND contextmenu;
int contextx, contexty;
HAB mainhab = 0;
HMQ mainhmq = 0;
HAB hab = 0; /* handle to the anchor block */
HMQ hmq = 0; /* handle to the message queue */
HWND hwndClient = 0; /* handle to the client */
HWND hwndFrame = 0; /* handle to the frame window */
HWND hwndMenu = 0; /* handle to the menu */
HWND hwndLeft = 0, hwndRight = 0; /* For nicklist */
HWND hwndscroll = 0, hwndnickscroll = 0; /* scrollerbars */
HWND MDIClient = 0,
MDIFrame = 0; /* MDI handles */
QMSG qmsg = { 0 }; /* message-queue structure */
HDC hdc = 0; /* handle to the device context */
HVPS hvps = 0,
mainHvps = 0, /* handle to the AVIO presentation space */
hvpsnick = 0;
static HEV sem = 0;
VIOMODEINFO viomode;
FILE *debug;
static unsigned char output_buf[256];
int output_tail = 0;
LONG menuY;
clock_t flush_counter;
int pmthread = -1;
HMTX mutex = 0;
ULONG cx, cy;
int just_resized = 0, dont_resize = 0, no_resize;
Screen *focus_screen, *just_resized_screen;
extern MenuStruct *morigin;
/* Used by window_menu_stub() */
ULONG menuroot=4000;
ULONG tmpmenuid=3000;
Screen *cursor_screen = NULL;
/* Used by popupmsg */
extern char *msgtext;
/* Used by the scrollers */
int newscrollerpos=0, lastscrollerpos=0, lastscrollerwindow=-1, lastpos=0;
/* Used by file dialog to make it non blocking */
char *codeptr, *paramptr;
/* Used by properties notebook */
static HWND hwndPage1;
static HWND hwndPage2;
static HWND hwndPage3;
static HWND hwndPage4;
static HWND hwndPage5;
int p1e, p2e, p3e, p4e, inproperties=0;
ChannelList *chan = NULL;
Window *nb_window=NULL;
FONTMETRICS fm;
int in_fontdialog=0;
IrcVariable *return_irc_var(int nummer);
IrcVariable *return_fset_var(int nummer);
CSetArray *return_cset_var(int nummer);
WSetArray *return_wset_var(int nummer);
int fontstart=0;
HMODULE hmod;
ULONG EXPENTRY (*DLL_mciPlayFile)(HWND, PSZ, ULONG, PSZ, HWND) = NULL;
ULONG EXPENTRY (*DLL_mciGetErrorString)(ULONG, PSZ, USHORT) = NULL;
ULONG EXPENTRY (*DLL_mciSendString)(PSZ, PSZ,USHORT, HWND, USHORT) = NULL;
#include "input.h"
#define WIDTH 10
/* needed for rclick */
#include "keys.h"
unsigned long menucmd;
int guiipc[2];
int new_menuref(MenuRef **root, int refnum, HWND menuhandle, int menuid)
{
MenuRef *new = new_malloc(sizeof(MenuRef));
if(new)
{
new->refnum = refnum;
new->menuhandle = menuhandle;
new->menuid = menuid;
new->next = NULL;
if (!*root)
*root = new;
else
{
MenuRef *prev = NULL, *tmp = *root;
while(tmp)
{
prev = tmp;
tmp = tmp->next;
}
if(prev)
prev->next = new;
else
*root = new;
}
return TRUE;
}
else
return FALSE;
}
int remove_menuref(MenuRef **root, int refnum)
{
MenuRef *prev = NULL, *tmp = *root;
while(tmp)
{
if(tmp->refnum == refnum)
{
if(!prev)
{
new_free(&tmp);
*root = NULL;
return 0;
}
else
{
prev->next = tmp->next;
new_free(&tmp);
return 0;
}
}
tmp = tmp->next;
}
return 0;
}
MenuRef *find_menuref(MenuRef *root, int refnum)
{
MenuRef *tmp = root;
while(tmp)
{
if(tmp->refnum == refnum)
return tmp;
tmp = tmp->next;
}
return NULL;
}
void gui_settitle(char *titletext, Screen *os2win) {
WinSetWindowText(os2win->hwndFrame, titletext);
}
void aflush() {
HMTX h = mutex;
/* flush */
if (output_tail > 0)
{
DosOpenMutexSem(NULL, &h);
DosRequestMutexSem(h, SEM_INDEFINITE_WAIT);
VioWrtTTY((PCH)output_buf, output_tail, (output_screen ? output_screen->hvps : hvps));
output_tail = 0;
DosReleaseMutexSem(h);
DosCloseMutexSem(h);
}
}
void sendevent(unsigned int event, unsigned int window)
{
unsigned int evbuf[2];
if(guiipc[1])
{
evbuf[0] = event;
evbuf[1] = window;
write(guiipc[1], (void *)evbuf, sizeof(unsigned int)*2);
}
return;
}
void flush_thread(void *param)
{
clock_t foo;
while (1 & 1)
{
foo = clock();
if ((foo - flush_counter) > 10)
{ if (output_tail > 0) { aflush(); } }
DosSleep(100L);
}
}
void cursor_off(HVPS this_hvps)
{
VIOCURSORINFO bleah;
VioGetCurType(&bleah, this_hvps);
bleah.attr = -1;
VioSetCurType(&bleah, this_hvps);
}
void cursor_thread(void)
{
VIOCURSORINFO bleah;
HVPS hvps;;
while(1 & 1)
{
DosSleep(500L);
if(cursor_screen && (hvps = cursor_screen->hvps))
{
VioGetCurType(&bleah, hvps);
bleah.attr = 0;
VioSetCurType(&bleah, hvps);
}
DosSleep(500L);
if(cursor_screen && (hvps = cursor_screen->hvps))
{
VioGetCurType(&bleah, hvps);
bleah.attr = -1;
VioSetCurType(&bleah, hvps);
}
}
}
void aputc(int c) {
HMTX h;
DosOpenMutexSem(NULL, &h);
DosRequestMutexSem(h, SEM_INDEFINITE_WAIT);
/* buffer */
if (output_tail < 256)
{
output_buf[output_tail] = (unsigned char) c;
output_tail++;
flush_counter = clock();
}
/* flush */
if (output_tail == 256 || c == '\n' || c == '\r')
{
VioWrtTTY((PCH)output_buf, output_tail, (output_screen ? output_screen->hvps : hvps));
output_tail = 0;
}
DosReleaseMutexSem(h);
DosCloseMutexSem(h);
}
int gui_read(Screen *screen, char *buffer, int maxbufsize) {
int i;
if (strlen(screen->aviokbdbuffer)> maxbufsize) {
for(i=0;i<=strlen(screen->aviokbdbuffer);i++)
{
if (i<maxbufsize) {
buffer[i]=screen->aviokbdbuffer[i];
}
else if(i==maxbufsize) {
buffer[i]=0;
screen->aviokbdbuffer[0]=screen->aviokbdbuffer[i];
}
else {
screen->aviokbdbuffer[i-maxbufsize]=screen->aviokbdbuffer[i];
}
}
} else {
strcpy(buffer,screen->aviokbdbuffer);
screen->aviokbdbuffer[0]='\0';
}
return strlen(buffer);
}
void aprintf(char *format, ...) {
va_list args;
char putbuf[AVIO_BUFFER+1], bluf[AVIO_BUFFER];
USHORT i, o;
va_start(args, format);
vsprintf(putbuf, format, args);
va_end(args);
i = o = 0;
while (putbuf[i] != '\n' && putbuf[i] != 0) {
i++;
if (putbuf[i] == '\n' || putbuf[i] == 0) {
strcpy(bluf, "");
strncat(bluf, &putbuf[o], i - o);
if (putbuf[i] != 0) strcat(bluf, "\r\n");
VioWrtTTY((PCH)bluf,
strlen(bluf),
(output_screen ? output_screen->hvps : hvps));
i++; o = i;
}
}
}
MRESULT EXPENTRY FontDlgProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
{
ULONG Remfonts = 0, Fonts = 0, i, i2;
static PFONTMETRICS fonts;
char buf[256];
ULONG maxX, maxY, len;
SWP menupos;
unsigned char *scr;
char fontsize[10];
static Screen *changescreen, *savedscreen = NULL;
switch (msg) {
case WM_DESTROY:
free(fonts);
break;
case WM_INITDLG:
savedscreen = current_window ? current_window->screen : main_screen;
VioQueryFonts(&Remfonts,
NULL,
0,
&Fonts,
"System VIO",
VQF_PUBLIC,
hvps);
fonts = malloc(sizeof(FONTMETRICS) * Remfonts);
Fonts = Remfonts;
VioQueryFonts(&Remfonts,
fonts,
sizeof(FONTMETRICS),
&Fonts,
"System VIO",
VQF_PUBLIC,
hvps);
for (i = 0; i < Fonts; i++)
{
if(fonts[i].lAveCharWidth != 5)
{
sprintf(buf, "%s %ux%u", fonts[i].szFacename, (unsigned int)fonts[i].lMaxBaselineExt, (unsigned int)fonts[i].lAveCharWidth);
WinSendMsg(WinWindowFromID(hwnd, 101),
LM_INSERTITEM,
MPFROMSHORT(LIT_END),
MPFROMP(buf));
}
else
fontstart=i;
}
fontstart++;
break;
case WM_COMMAND:
switch (COMMANDMSG(&msg)->cmd)
{
case DID_CANCEL:
WinDismissDlg(hwnd, 0);
break;
case DID_OK:
i = (ULONG)WinSendMsg(WinWindowFromID(hwnd, LB_FONTLIST),
LM_QUERYSELECTION,
MPFROMSHORT(LIT_CURSOR),
0);
if(i == LIT_NONE)
{
WinDismissDlg(hwnd, 0);
return (MRESULT)0;
}
i+=fontstart;
i2 = (ULONG)WinSendMsg(WinWindowFromID(hwnd, CB_DEFAULT),
BM_QUERYCHECK,
0,
0);
if(i2)
{
sprintf(fontsize, "%dx%d", (int)fonts[i].lAveCharWidth, (int)fonts[i].lMaxBaselineExt);
set_string_var(DEFAULT_FONT_VAR, fontsize);
}
i2 = (ULONG)WinSendMsg(WinWindowFromID(hwnd, CB_CHANGEFORALL),
BM_QUERYCHECK,
0, 0);
if(i2)
changescreen = screen_list;
else
changescreen = savedscreen;
while(changescreen)
{
if(changescreen->alive)
{
len = (changescreen->co + 1) * changescreen->li * 2;
scr = malloc(len);
VioReadCellStr(scr, (PUSHORT)&len, 0, 0, changescreen->hvps);
changescreen->VIO_font_width = fonts[i].lAveCharWidth;
changescreen->VIO_font_height = fonts[i].lMaxBaselineExt;
current_term->co = changescreen->co;
current_term->li = changescreen->li;
cx = (changescreen->co - 1) * changescreen->VIO_font_width;
cy = changescreen->li * changescreen->VIO_font_height;
maxX = WinQuerySysValue(HWND_DESKTOP, SV_CXSCREEN);
maxY = WinQuerySysValue(HWND_DESKTOP, SV_CYSCREEN);
/* No point in making bigger windows than the screen */
if (cx > maxX)
changescreen->co = (maxX / changescreen->VIO_font_width) -1;
if (cy > maxY)
changescreen->li = (maxY / changescreen->VIO_font_height) -1;
/* Recalculate in case we modified the values */
cx = (changescreen->co - 1) * changescreen->VIO_font_width;
cy = changescreen->li * changescreen->VIO_font_height;
if(changescreen->nicklist)
cx += (changescreen->VIO_font_width * changescreen->nicklist) + cxvs;
if(changescreen->hwndMenu==(HWND)NULL)
WinSetWindowPos(changescreen->hwndFrame, HWND_TOP, 0, 0, cx + (cxsb*2) + cxvs, cy + (cysb*2)+cytb, SWP_SIZE);
else
{
WinQueryWindowPos(changescreen->hwndMenu, &menupos);
WinSetWindowPos(changescreen->hwndFrame, HWND_TOP, 0, 0, cx + (cxsb*2) + cxvs, cy + (cxsb*2)+cytb + menupos.cy, SWP_SIZE);
}
VioSetDeviceCellSize(changescreen->VIO_font_height, changescreen->VIO_font_width, changescreen->hvps);
VioSetDeviceCellSize(changescreen->VIO_font_height, changescreen->VIO_font_width, changescreen->hvpsnick);
VioWrtCellStr(scr, len, 0, 0, changescreen->hvps);
free(scr);
}
if(i2)
changescreen = changescreen->next;
else
changescreen = NULL;
}
WinDismissDlg(hwnd, 0);
break;
default: break;
}
return((MRESULT)0);
break;
}
return (WinDefDlgProc(hwnd, msg, mp1, mp2));
}
void font_dialog_stub(Screen *screen)
{
HAB hnbab;
HMQ hnbmq;
hnbab = WinInitialize(0);
hnbmq = WinCreateMsgQueue(hnbab, 0);
WinDlgBox(HWND_DESKTOP, screen->hwndFrame, FontDlgProc, NULLHANDLE, FONTDIALOG, NULL);
in_fontdialog=0;
WinDestroyMsgQueue(hnbmq);
WinTerminate(hnbab);
}
void gui_font_dialog(Screen *screen)
{
if(in_fontdialog)
return;
in_fontdialog=1;
_beginthread((void *)font_dialog_stub, NULL, 0xFFFF, (void *)screen);
}
void set_right_window(HWND hwnd)
{
Screen *this_screen = NULL;
static Screen *last_screen = NULL;
this_screen = (Screen *)WinQueryWindowPtr(WinQueryWindow(hwnd, QW_PARENT), 0);
if (!this_screen)
this_screen = (Screen *)WinQueryWindowPtr(hwnd, 0);
if (!this_screen)
this_screen = output_screen;
if (this_screen != last_screen)
make_window_current(this_screen->current_window);
last_screen = this_screen;
}
int mesg(char *format, ...) {
va_list args;
char outbuf[256];
va_start(args, format);
vsprintf(outbuf, format, args);
va_end(args);
WinMessageBox(HWND_DESKTOP, HWND_DESKTOP, outbuf, "PMBitchX", 0, MB_OK | MB_INFORMATION | MB_MOVEABLE);
return strlen(outbuf);
}
/* Routines dealing with menus */
HWND newsubmenu(MenuStruct *menutoadd, HWND location, int pulldown)
{
HWND tmphandle;
MenuList *tmp;
MENUITEM miSubMenu;
HWND hwndSubmenu;
ULONG itemmask, flag = 0L, id = 0L;
if(menutoadd->sharedhandle && WinIsWindow(hab, menutoadd->sharedhandle))
return menutoadd->sharedhandle;
if(pulldown)
{
flag = MS_ACTIONBAR;
id = FID_MENU;
}
tmphandle=WinCreateWindow(location,
WC_MENU,
NULL,
flag,
0,0,0,0,
location,
HWND_TOP,
id,
NULL,
NULL);
/* Go through all menuitems adding items and submenus (and subitems) as neccessary */
tmp = menutoadd->menuorigin;
while(tmp!=NULL)
{
itemmask=0;
hwndSubmenu=(HWND)NULLHANDLE;
if(tmp->menutype & GUISUBMENU)
{
if(tmp->menutype & GUISHARED)
{
MenuStruct *tmpmenu = findmenu(tmp->submenu);
if(!tmpmenu->sharedhandle || !WinIsWindow(hab, tmpmenu->sharedhandle))
{
hwndSubmenu=tmpmenu->sharedhandle=(HWND)newsubmenu(tmpmenu, HWND_OBJECT, FALSE);
/* By mikh's recommendation :) */
WinSetWindowULong(hwndSubmenu, QWL_STYLE,
WinQueryWindowULong(hwndSubmenu, QWL_STYLE) & ~MS_ACTIONBAR);
}
else
hwndSubmenu=(HWND)tmpmenu->sharedhandle;
}
else
hwndSubmenu=(HWND)newsubmenu((MenuStruct *)findmenu(tmp->submenu), tmphandle, FALSE);
}
miSubMenu.iPosition=MIT_END;
miSubMenu.afStyle=MIS_TEXT;
if(tmp->menutype & GUISEPARATOR)
miSubMenu.afStyle = MIS_SEPARATOR;
if(tmp->menutype & GUIBRKMENUITEM)
miSubMenu.afStyle |= MIS_BREAKSEPARATOR;
if(tmp->menutype & GUIBRKSUBMENU)
miSubMenu.afStyle |= MIS_BREAKSEPARATOR;
if(tmp->menutype & GUIIAMENUITEM)
itemmask |= MIA_DISABLED;
if(tmp->menutype & GUICHECKEDMENUITEM)
itemmask |= MIA_CHECKED;
if(tmp->menutype & GUINDMENUITEM)
itemmask |= MIA_NODISMISS;
miSubMenu.afAttribute=0;
miSubMenu.id=tmp->menuid;
miSubMenu.hwndSubMenu=hwndSubmenu;
miSubMenu.hItem=NULLHANDLE;
WinSendMsg((HWND)tmphandle,
MM_INSERTITEM,
MPFROMP(&miSubMenu),
MPFROMP(tmp->name));
if(tmp->refnum > 0)
new_menuref(&menutoadd->root, tmp->refnum, tmphandle, tmp->menuid);
/* Set other options */
if(itemmask != 0)
WinSendMsg((HWND)tmphandle, MM_SETITEMATTR, MPFROM2SHORT(tmp->menuid, TRUE), MPFROM2SHORT(itemmask, itemmask));
if(tmp->menutype & GUIDEFMENUITEM)
{
WinSetWindowBits((HWND)tmphandle, QWL_STYLE, MS_CONDITIONALCASCADE,MS_CONDITIONALCASCADE );
/* Set cascade menu default */
WinSendMsg((HWND)tmphandle, MM_SETDEFAULTITEMID, MPFROMSHORT(tmp->menuid), NULL );
}
tmp=tmp->next;
}
return tmphandle;
}
/* This is so I can create a menu easily from elsewhere in the code */
HWND menucreatestub(char *addthismenu, HWND location, int pulldown)
{
MenuStruct *menutoadd;
if((menutoadd = (MenuStruct *)findmenu(addthismenu))==NULL)
{
say("Menu not found.");
return 0;
}
if(!menutoadd->menuorigin)
{
say("Cannot create blank menu.");
return 0;
}
if(menutoadd->sharedhandle && WinIsWindow(hab, menutoadd->sharedhandle))
return menutoadd->sharedhandle;
else
return newsubmenu(menutoadd, location, pulldown);
}
void detach_shared(Screen *this_screen)
{
int itemid = (int)WinSendMsg(this_screen->hwndMenu, MM_ITEMIDFROMPOSITION, (MPARAM)0, (MPARAM)NULL);
/* Set any owners of shared menus to HWND_OBJECT so the won't get destroyed - thanks mikh */
if(this_screen->menu && WinIsWindow(hab, this_screen->hwndMenu))
{
MenuStruct *tmpmenu = findmenu(this_screen->menu);
if(tmpmenu)
{
MenuList *current = tmpmenu->menuorigin;
if(tmpmenu->sharedhandle && WinIsWindow(hab, tmpmenu->sharedhandle))
WinSetOwner(tmpmenu->sharedhandle, HWND_OBJECT);
else
{
while(current)
{
MenuStruct *submenu;
if((current->menutype & GUISHARED) && (submenu = findmenu(current->submenu)))
{
if(submenu->sharedhandle && WinIsWindow(hab, submenu->sharedhandle))
WinSetOwner(submenu->sharedhandle, HWND_OBJECT);
}
current = current->next;
}
}
}
}
while(itemid != -1)
{
/* This may cause memory leaks... unless they are all shared (menu.bx is) */
WinSendMsg(this_screen->hwndMenu, MM_REMOVEITEM, MPFROM2SHORT(itemid, FALSE), NULL);
itemid = (int)WinSendMsg(this_screen->hwndMenu, MM_ITEMIDFROMPOSITION, (MPARAM)0, (MPARAM)NULL);
}
}
void window_menu_stub(Screen *menuscreen, char *addthismenu)
{
int menustate=0, newmenustate=0;
tmpmenuid=3000;
if(!menuscreen)
return;
if(menuscreen->hwndMenu && WinIsWindow(hab, menuscreen->hwndMenu))
{
menustate=1;
detach_shared(menuscreen);
WinDestroyWindow(menuscreen->hwndMenu);
menuscreen->hwndMenu = NULLHANDLE;
new_free(&menuscreen->menu);
}
/* Create toplevel menu */
aflush();
if(addthismenu && strcmp(addthismenu, "-delete")!=0)
{
if((menuscreen->hwndMenu=(HWND)menucreatestub(addthismenu, menuscreen->hwndFrame, TRUE))!=(HWND)NULL)
newmenustate=1;
}
else
menuscreen->hwndMenu=(HWND)NULL;
if(newmenustate==1)
menuscreen->menu=m_strdup(addthismenu);
else
menuscreen->menu=NULL;
/* Tell the Window to resize because of menu */
WinSendMsg(menuscreen->hwndFrame, WM_UPDATEFRAME, 0, 0);
if(menustate != newmenustate)
WinSendMsg(menuscreen->hwndFrame, WM_USER, 0, 0);
new_free(&addthismenu);
}
void pm_seticon(Screen *screen)
{
static HPOINTER icon = 0;
if(!screen)
return;
/* For some reason the icon gets unset when spawning */
if(!icon)
icon = WinLoadPointer(HWND_DESKTOP,NULLHANDLE,IDM_MAINMENU);
WinSendMsg(screen->hwndFrame, WM_SETICON, (MPARAM)icon, 0);
}
void pm_mdi_on(void)
{
Screen *tmp = screen_list;
HSWITCH hswitch;
SWCNTRL swcntrl;
SWP swpw, swpf;
PID pid;
ULONG width, height, x, y;
WinSetParent(MDIFrame, HWND_DESKTOP, TRUE);
WinQueryWindowProcess(MDIFrame, &pid, NULL);
/* initialize switch structure */
swcntrl.hwnd = MDIFrame;
swcntrl.hwndIcon = NULLHANDLE;
swcntrl.hprog = NULLHANDLE;
swcntrl.idProcess = pid;
swcntrl.idSession = 0;
swcntrl.uchVisibility = SWL_VISIBLE;
swcntrl.fbJump = SWL_JUMPABLE;
strcpy(swcntrl.szSwtitle,irc_version);
hswitch = WinCreateSwitchEntry(mainhab, &swcntrl);
width = (ULONG)((((float)WinQuerySysValue(HWND_DESKTOP, SV_CXSCREEN)))*0.75);
height = (ULONG)((((float)WinQuerySysValue(HWND_DESKTOP, SV_CYSCREEN)))*0.75);
x = (ULONG)((WinQuerySysValue(HWND_DESKTOP, SV_CXSCREEN)-width)/2);
y = (ULONG)((WinQuerySysValue(HWND_DESKTOP, SV_CYSCREEN)-height)/2);
WinSetWindowPos(MDIFrame, 0, x, y, width, height, SWP_MOVE | SWP_SIZE | SWP_SHOW);
WinShowWindow(MDIFrame, TRUE);
WinQueryWindowPos(MDIClient, &swpf);
WinSetWindowULong(MDIFrame, QWP_USER, swpf.cy);
while(tmp)
{
if(tmp->alive)
{
WinQueryWindowPos(tmp->hwndFrame, &swpw);
hswitch = WinQuerySwitchHandle(tmp->hwndFrame, 0);
if(hswitch)
{
WinQuerySwitchEntry(hswitch, &swcntrl);
swcntrl.uchVisibility = SWL_INVISIBLE;
WinChangeSwitchEntry(hswitch, &swcntrl);
}
WinSetParent(tmp->hwndFrame, MDIClient, TRUE);
WinSetWindowPos(tmp->hwndFrame, NULLHANDLE, swpw.x, swpw.y - (WinQuerySysValue(HWND_DESKTOP, SV_CYSCREEN) - swpf.cy), 0, 0, SWP_MOVE);
}
tmp = tmp->next;
}
}
void pm_mdi_off(void)
{
Screen *tmp = screen_list;
HSWITCH hswitch;
SWCNTRL swcntrl;
SWP swpw, swpf;
WinQueryWindowPos(MDIClient, &swpf);
hswitch = WinQuerySwitchHandle(MDIFrame, 0);
if(hswitch)
WinRemoveSwitchEntry(hswitch);
while(tmp)
{
if(tmp->alive)
{
WinQueryWindowPos(tmp->hwndFrame, &swpw);
WinSetParent(tmp->hwndFrame, HWND_DESKTOP, TRUE);
WinSetWindowPos(tmp->hwndFrame, NULLHANDLE, swpw.x, swpw.y + (WinQuerySysValue(HWND_DESKTOP, SV_CYSCREEN) - swpf.cy), 0, 0, SWP_MOVE);
hswitch = WinQuerySwitchHandle(tmp->hwndFrame, 0);
if(hswitch)
{
WinQuerySwitchEntry(hswitch, &swcntrl);
swcntrl.uchVisibility = SWL_VISIBLE;
WinChangeSwitchEntry(hswitch, &swcntrl);
}
}
tmp = tmp->next;
}
WinShowWindow(MDIFrame, FALSE);
WinSetParent(MDIFrame, HWND_OBJECT, TRUE);
}
int test_callback(HWND window, void *data)
{
dw_window_destroy((HWND)data);
return -1;
}
void pm_aboutbox(char *about_text)
{
HWND mainwindow, text, stext, logo,
okbutton, buttonbox, lbbox;
ULONG flStyle = FCF_SYSMENU | FCF_TITLEBAR |
FCF_SHELLPOSITION | FCF_TASKLIST | FCF_DLGBORDER | FCF_SIZEBORDER | FCF_MINMAX;
mainwindow = dw_window_new(HWND_DESKTOP, "About PMBitchX", flStyle);
dw_window_set_icon(mainwindow, IDM_MAINMENU);
lbbox = dw_box_new(BOXVERT, 10);
dw_box_pack_start(mainwindow, lbbox, 0, 0, TRUE, TRUE, 0);
stext = dw_text_new("PMBitchX (c) 2002 Colten Edwards, Brian Smith", 0);
dw_window_set_style(stext, DT_VCENTER, DT_VCENTER);
dw_window_set_style(stext, DT_CENTER, DT_CENTER);
dw_box_pack_start(lbbox, stext, 130, 20, TRUE, FALSE, 10);
buttonbox = dw_box_new(BOXHORZ, 0);
dw_box_pack_start(lbbox, buttonbox, 0, 0, TRUE, FALSE, 0);
dw_window_set_color(buttonbox, CLR_PALEGRAY, CLR_PALEGRAY);
logo = dw_bitmap_new(0);
dw_window_set_bitmap(logo, IDM_LOGO);
dw_box_pack_start(buttonbox, 0, 52, 52, TRUE, FALSE, 5);
dw_box_pack_start(buttonbox, logo, 52, 52, FALSE, FALSE, 5);
dw_box_pack_start(buttonbox, 0, 52, 52, TRUE, FALSE, 5);
text = dw_text_new(about_text, 0);
dw_window_set_style(text, DT_CENTER, DT_CENTER);
dw_window_set_style(text, DT_WORDBREAK, DT_WORDBREAK);
dw_box_pack_start(lbbox, text, 130, 120, TRUE, TRUE, 10);
buttonbox = dw_box_new(BOXHORZ, 0);
dw_box_pack_start(lbbox, buttonbox, 0, 0, TRUE, FALSE, 0);
okbutton = dw_button_new("Ok", 1001L);
dw_box_pack_start(buttonbox, 0, 50, 30, TRUE, FALSE, 5);
dw_box_pack_start(buttonbox, okbutton, 50, 30, FALSE, FALSE, 5);
dw_box_pack_start(buttonbox, 0, 50, 30, TRUE, FALSE, 5);
dw_window_set_usize(mainwindow, 435, 340);
dw_window_show(mainwindow);
dw_signal_connect(okbutton, "clicked", DW_SIGNAL_FUNC(test_callback), (void *)mainwindow);
dw_signal_connect(mainwindow, "delete_event", DW_SIGNAL_FUNC(test_callback), (void *)mainwindow);
}
void pm_resize(Screen *this_screen)
{
if(this_screen->co < 20) this_screen->old_co=this_screen->co=20;
if(this_screen->li < 10) this_screen->old_li=this_screen->li=10;
if(this_screen->co > 199) this_screen->old_co=this_screen->co=199;
if(this_screen->li > 99) this_screen->old_li=this_screen->li=99;
cx = this_screen->co * this_screen->VIO_font_width;
cy = this_screen->li * this_screen->VIO_font_height;
current_term->co = this_screen->co; current_term->li = this_screen->li;
/* Recalculate some stuff that was done in input.c previously */
this_screen->input_line = this_screen->li-1;
this_screen->input_zone_len = this_screen->co - (WIDTH * 2);
if (this_screen->input_zone_len < 10)
this_screen->input_zone_len = 10; /* Take that! */
this_screen->input_start_zone = WIDTH;
this_screen->input_end_zone = this_screen->co - WIDTH;
}
void drawnicklist(Screen *this_screen)
{
NickList *n, *list = NULL;
ChannelList *cptr;
char minibuffer[NICKNAME_LEN+1], spaces[100];
int nickcount=0, k;
if(!this_screen)
return;
memset(spaces, ' ', 100);
if(this_screen->current_window && this_screen->current_window->current_channel)
{
cptr = lookup_channel(this_screen->current_window->current_channel, this_screen->current_window->server, 0);
list = sorted_nicklist(cptr, get_int_var(NICKLIST_SORT_VAR));
if(this_screen->spos<0)
this_screen->spos=0;
for(n = list; n; n = n->next)
{
if(nickcount >= this_screen->spos && nickcount < this_screen->spos + this_screen->li)
{
minibuffer[0]=' ';
minibuffer[1]='\0';
if(nick_isvoice(n))
strcpy(minibuffer, "+");
if(nick_isop(n))
strcpy(minibuffer, "@");
if(nick_isircop(n))
{
if(minibuffer[0] == ' ')
strcpy(minibuffer, "*");
else
strcat(minibuffer, "*");
}
strcat(minibuffer, n->nick);
for(k=strlen(minibuffer);k<(this_screen->nicklist+1);k++)
minibuffer[k]=' ';
minibuffer[k]='\0';
VioSetCurPos(nickcount-this_screen->spos, 0, this_screen->hvpsnick);
if(this_screen->mpos == nickcount)
VioWrtTTY("\e[0;1;37;44m", 12, this_screen->hvpsnick);
VioWrtTTY(minibuffer, strlen(minibuffer), this_screen->hvpsnick);
VioWrtTTY("\e[0m", 4, this_screen->hvpsnick);
}
nickcount++;
}
}
if(nickcount < this_screen->li)
{
for(k=nickcount;k<this_screen->li;k++)
{
VioSetCurPos(k, 0, this_screen->hvpsnick);
VioWrtTTY(spaces, NICKNAME_LEN, this_screen->hvpsnick);
}
}
else if (this_screen->spos > nickcount-this_screen->li)
{
this_screen->spos=nickcount-this_screen->li;
drawnicklist(this_screen);
}
WinSendMsg(this_screen->hwndnickscroll, SBM_SETSCROLLBAR, (MPARAM)this_screen->spos, MPFROM2SHORT(0, nickcount - this_screen->li));
WinSendMsg(this_screen->hwndnickscroll, SBM_SETTHUMBSIZE, MPFROM2SHORT(this_screen->li, nickcount), (MPARAM)NULL);
if(list)
clear_sorted_nicklist(&list);
}
void pm_focus(char key)
{
int count = 1, page = (int)(key - '0');
Screen *tmp = screen_list;
if(key == '0')
page = 10;
while(tmp)
{
if(count == page)
WinSetFocus(HWND_DESKTOP, tmp->hwndClient);
count++;
tmp = tmp->next;
}
}
MRESULT EXPENTRY FrameWndProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
{
PMYWINDATA wd;
HPS hps;
Screen *this_screen = NULL;
wd = (PMYWINDATA)WinQueryWindowPtr(hwnd, QWP_USER);
if(wd)
this_screen = wd->screen;
switch (msg) {
case WM_BUTTON1MOTIONSTART:
case WM_BUTTON2MOTIONSTART:
case WM_BUTTON1UP:
case WM_BUTTON2UP:
case WM_BUTTON1DOWN:
case WM_BUTTON2DOWN:
case WM_SETFOCUS:
case WM_COMMAND:
case WM_CONTEXTMENU:
case WM_CHAR:
{
if(this_screen)
return GenericWndProc(this_screen->hwndClient, msg, mp1, mp2);
else
return NULL;
}
break;
case WM_PAINT:
hps = WinBeginPaint(hwnd, hvps, NULL);
if (this_screen)
{
VioShowPS(this_screen->li+1,
this_screen->co+1,
0,
this_screen->hvps);
if(this_screen->nicklist)
VioShowPS(this_screen->li+1,
this_screen->nicklist + 1,
0,
this_screen->hvpsnick);
}
WinEndPaint(hps);
return (WinDefAVioWindowProc(hwnd, msg, (ULONG)mp1, (ULONG)mp2));
}
return (MRESULT)WinDefWindowProc(hwnd, msg, mp1, mp2);
}
MRESULT EXPENTRY GenericWndProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
{
HPS hps;
int tmp, statusstart;
SHORT x, y, i;
SWP swp, menupos;
static HVPS hvps;
Screen *this_screen = NULL;
PMYWINDATA wd;
static int sx, sy, tx, ty;
static unsigned char *mark = NULL;
ULONG len;
POINTL ptl;
static PVOID shared;
TRACKINFO ti;
APIRET rc;
char *selectionbuffer;
VIOCURSORINFO bleah;
wd = (PMYWINDATA)WinQueryWindowPtr(hwnd, QWP_USER);
if (!wd)
wd = (PMYWINDATA)WinQueryWindowPtr(WinWindowFromID(hwnd, FID_CLIENT), QWP_USER);
if (wd)
{
hvps = wd->hvps;
this_screen = wd->screen;
if (!this_screen) { wd->screen = main_screen; this_screen = wd->screen; }
}
switch (msg) {
/* rosmo's awesome copy functions */
case WM_BUTTON1MOTIONSTART:
if(this_screen)
{
WinQueryPointerPos(HWND_DESKTOP, &ptl);
WinMapWindowPoints(HWND_DESKTOP, hwnd, &ptl, 1);
WinQueryWindowPos(hwnd, &swp);
ti.rclTrack.xLeft = ti.rclTrack.xRight = (int)(((int)(ptl.x/this_screen->VIO_font_width))*this_screen->VIO_font_width)+1;
ti.rclTrack.yBottom = ti.rclTrack.yTop = (int)(((int)(ptl.y/this_screen->VIO_font_height)+1)*this_screen->VIO_font_height)+1;
ti.rclTrack.xLeft--;
ti.rclTrack.yBottom--;
WinQueryWindowRect(this_screen->hwndLeft, &ti.rclBoundary);
ti.cxBorder = ti.cyBorder = 1;
ti.cxGrid = this_screen->VIO_font_width;
ti.cyGrid = this_screen->VIO_font_height;
ti.cxKeyboard = 0;
ti.cyKeyboard = 0;
ti.ptlMinTrackSize.x = 0;
ti.ptlMinTrackSize.y = 0;
ti.ptlMaxTrackSize.x = swp.cx + this_screen->VIO_font_width;
ti.ptlMaxTrackSize.y = swp.cy + this_screen->VIO_font_height;
ti.fs = TF_BOTTOM | TF_RIGHT;
/* Allocate a buffer to store the entire screen so it won't change
during selection - NuKe */
selectionbuffer = new_malloc((this_screen->li * this_screen->co) + 1);
for(i=0;i<this_screen->li;i++)
VioReadCharStr(&selectionbuffer[i*this_screen->co], (PUSHORT)&this_screen->co, i, 0, hvps);
if (WinTrackRect(hwnd, NULLHANDLE, &ti))
{
sx = (int)(ti.rclTrack.xLeft/this_screen->VIO_font_width);
ty = this_screen->li - (int)(ti.rclTrack.yBottom/this_screen->VIO_font_height);
tx = (int)(ti.rclTrack.xRight/this_screen->VIO_font_width);
sy = this_screen->li - (int)(ti.rclTrack.yTop/this_screen->VIO_font_height);
mark = new_malloc((ty - sy) * (tx - sx + 2) + 1); i = 0;
for (y = sy; y < ty; y++)
{
len = tx - sx;
memcpy(&mark[i], &selectionbuffer[(y * this_screen->co) + sx], len);
i += len - 1;
/* get rid of trailing white space */
while(mark[i] == ' ' && i > 0)
i--;
mark[i + 1] = '\r';
mark[i + 2] = '\n';
i += 2;
}
mark[i] = '\0';
/* Ok, we got the stuff - now place it in the clipboard */
WinOpenClipbrd(hab); /* Open clipboard */
WinEmptyClipbrd(hab); /* Empty clipboard */
/* Ok, clipboard wants giveable unnamed shared memory */
shared = NULL;
rc = DosAllocSharedMem(&shared,
NULL,
i,
OBJ_GIVEABLE | PAG_COMMIT | PAG_READ | PAG_WRITE);
if (rc == 0)
{
memcpy(shared, mark, i);
WinSetClipbrdData(hab,
(ULONG)shared,
CF_TEXT,
CFI_POINTER);
}
WinCloseClipbrd(hab); /* Close clipboard */
new_free(&selectionbuffer);
new_free(&mark);
}
}
break;
case WM_SETFOCUS:
if (SHORT1FROMMP(mp2)==TRUE)
{
/* If we have a shared menu attached to the window make it owned by the
* current window so it opens properly
*/
cursor_screen = this_screen;
if(this_screen && this_screen->current_window)
{
if(this_screen->menu)
{
MenuStruct *tmpmenu = findmenu(this_screen->menu);
if(tmpmenu)
{
MenuList *current = tmpmenu->menuorigin;
if(tmpmenu->sharedhandle && WinIsWindow(hab, tmpmenu->sharedhandle))
WinSetOwner(tmpmenu->sharedhandle, this_screen->hwndClient);
else
{
while(current)
{
HWND hwndmenu;
MenuStruct *submenu;
if((current->menutype & GUISHARED) && (submenu = findmenu(current->submenu)))
{
if(submenu->sharedhandle && WinIsWindow(hab, submenu->sharedhandle) && (hwndmenu = WinWindowFromID(this_screen->hwndFrame, FID_MENU)))
WinSetOwner(submenu->sharedhandle, hwndmenu);
}
current = current->next;
}
}
}
}
WinSetCp(hmq, this_screen->codepage);
WinSetCp(mainhmq, this_screen->codepage);
/* Tell the main thread to set this window as current */
sendevent(EVFOCUS, this_screen->current_window->refnum);
}
}
else
{
cursor_screen = NULL;
if(this_screen)
{
VioGetCurType(&bleah, this_screen->hvps);
bleah.attr = -1;
VioSetCurType(&bleah, this_screen->hvps);
}
}
break;
case WM_COMMAND:
menucmd=COMMANDMSG(&msg)->cmd;
sendevent(EVMENU, this_screen->current_window->refnum);
return((MRESULT)0);
break;
case WM_CLOSE:
#ifdef WINDOW_CREATE
kill_screen(this_screen);
#else
irc_exit(1, NULL, "%s rocks your world!", VERSION);
#endif
break;
case WM_PAINT:
hps = WinBeginPaint(hwnd, hvps, NULL);
if (this_screen)
{
VioShowPS(this_screen->li+1,
this_screen->co+1,
0,
this_screen->hvps);
if(this_screen->nicklist)
VioShowPS(this_screen->li+1,
this_screen->nicklist + 1,
0,
this_screen->hvpsnick);
}
WinEndPaint(hps);
return (WinDefAVioWindowProc(hwnd, msg, (ULONG)mp1, (ULONG)mp2));
case WM_CHAR:
if((SHORT1FROMMP(mp1) & KC_KEYUP)) break;
if(strlen(this_screen->aviokbdbuffer)==254) {
DosBeep(1000, 200);
} else {
if(SHORT1FROMMP(mp2) != 0) {
tmp=strlen(this_screen->aviokbdbuffer);
if (CHAR1FROMMP(mp2) == 224) {
this_screen->aviokbdbuffer[tmp]='\e';
this_screen->aviokbdbuffer[tmp+1]=CHAR2FROMMP(mp2);
this_screen->aviokbdbuffer[tmp+2]=0;
} else {
/* Fake a SIGINT on CTRL-C */
#if 0
if((SHORT1FROMMP(mp1) & KC_CTRL) && SHORT1FROMMP(mp2) == 99)
raise(SIGINT);
#endif
if((SHORT1FROMMP(mp1) & KC_ALT) && SHORT1FROMMP(mp2) >= '0' && SHORT1FROMMP(mp2) <= '9')
pm_focus((char)SHORT1FROMMP(mp2));
else if ((SHORT1FROMMP(mp1) & KC_CTRL) && (SHORT1FROMMP(mp2) > 96) && (SHORT1FROMMP(mp2) < 122))
this_screen->aviokbdbuffer[tmp]=SHORT1FROMMP(mp2)-96;
else
this_screen->aviokbdbuffer[tmp]=SHORT1FROMMP(mp2);
this_screen->aviokbdbuffer[tmp+1]=0;
}
}
}
/* Force select() to exit */
sendevent(EVNONE, 0);
break;
case WM_BUTTON1UP:
case WM_BUTTON2UP:
case WM_BUTTON3UP:
case WM_BUTTON1DBLCLK:
case WM_BUTTON2DBLCLK:
case WM_BUTTON3DBLCLK:
{
/* Save the server, and restore it when we are done. */
int save_server = from_server;
WinQueryPointerPos(HWND_DESKTOP, &ptl);
WinMapWindowPoints(HWND_DESKTOP, this_screen->hwndClient, &ptl, 1);
contextx=ptl.x;contexty=ptl.y;
lastclickrow=this_screen->li - ((int)(ptl.y/this_screen->VIO_font_height)) - 1;
lastclickcol=((int)(ptl.x/this_screen->VIO_font_width));
last_input_screen=output_screen=this_screen;
make_window_current(this_screen->current_window);
from_server = current_window->server;
if(this_screen->nicklist && lastclickcol > this_screen->co)
{
USHORT len = this_screen->nicklist + 1;
lastclickcol = 0;
if(lastclicklinedata != NULL)
{
VioReadCharStr((PCH)lastclicklinedata,(PUSHORT)&len,lastclickrow,0,this_screen->hvpsnick);
lastclicklinedata[len] = 0;
}
if(lastclicklinedata[0] == ' ')
memmove(lastclicklinedata, &lastclicklinedata[1], strlen(lastclicklinedata));
this_screen->mpos = lastclickrow + this_screen->spos;
drawnicklist(this_screen);
switch(msg)
{
case WM_BUTTON1UP:
wm_process(NICKLISTLCLICK);
break;
case WM_BUTTON2UP:
wm_process(NICKLISTRCLICK);
break;
case WM_BUTTON3UP:
wm_process(NICKLISTMCLICK);
break;
case WM_BUTTON1DBLCLK:
wm_process(NICKLISTLDBLCLICK);
break;
case WM_BUTTON2DBLCLK:
wm_process(NICKLISTRDBLCLICK);
break;
case WM_BUTTON3DBLCLK:
wm_process(NICKLISTMDBLCLICK);
break;
}
from_server = save_server;
return NULL;
}
if(lastclicklinedata != NULL)
VioReadCharStr((PCH)lastclicklinedata,(PUSHORT)&this_screen->co,lastclickrow,0,this_screen->hvps);
statusstart=this_screen->li - 2;
/* I was hoping there was an easier way but....I gave up */
if(this_screen->window_list_end->status_lines == 0 && this_screen->window_list_end->double_status == 1 && this_screen->window_list_end->status_split == 1)
statusstart=statusstart-1;
if(this_screen->window_list_end->status_lines == 1 && this_screen->window_list_end->double_status == 0 && this_screen->window_list_end->status_split == 0)
statusstart=statusstart-1;
if(this_screen->window_list_end->status_lines == 1 && this_screen->window_list_end->double_status == 1 && this_screen->window_list_end->status_split == 1)
statusstart=statusstart-1;
if(this_screen->window_list_end->status_lines == 1 && this_screen->window_list_end->double_status == 1 && this_screen->window_list_end->status_split == 0)
statusstart=statusstart-2;
if(lastclickrow <= (current_window->screen->li - 2) && lastclickrow >= statusstart)
{
switch(msg)
{
case WM_BUTTON1UP:
wm_process(STATUSLCLICK);
break;
case WM_BUTTON2UP:
wm_process(STATUSRCLICK);
break;
case WM_BUTTON3UP:
wm_process(STATUSMCLICK);
break;
case WM_BUTTON1DBLCLK:
wm_process(STATUSLDBLCLICK);
break;
case WM_BUTTON2DBLCLK:
wm_process(STATUSRDBLCLICK);
break;
case WM_BUTTON3DBLCLK:
wm_process(STATUSMDBLCLICK);
break;
}
}
else
{
switch(msg)
{
case WM_BUTTON1UP:
wm_process(LCLICK);
break;
case WM_BUTTON2UP:
wm_process(RCLICK);
break;
case WM_BUTTON3UP:
wm_process(MCLICK);
break;
case WM_BUTTON1DBLCLK:
wm_process(LDBLCLICK);
break;
case WM_BUTTON2DBLCLK:
wm_process(RDBLCLICK);
break;
case WM_BUTTON3DBLCLK:
wm_process(MDBLCLICK);
break;
}
}
from_server = save_server;
}
break;
case WM_VSCROLL:
if(SHORT1FROMMP(mp1) == 1000)
{ /* Channel is being scrolled */
switch(SHORT2FROMMP(mp2))
{
case SB_LINEUP:
sendevent(EVSUP, this_screen->current_window->refnum);
break;
case SB_LINEDOWN:
sendevent(EVSDOWN, this_screen->current_window->refnum);
break;
case SB_PAGEUP:
sendevent(EVSUPPG, this_screen->current_window->refnum);
break;
case SB_PAGEDOWN:
sendevent(EVSDOWNPG, this_screen->current_window->refnum);
break;
case SB_SLIDERTRACK:
newscrollerpos=SHORT1FROMMP(mp2);
if(newscrollerpos<0)
newscrollerpos=0;
if(newscrollerpos>get_int_var(SCROLLBACK_VAR))
newscrollerpos=get_int_var(SCROLLBACK_VAR);
sendevent(EVSTRACK, this_screen->current_window->refnum);
break;
}
} else if(SHORT1FROMMP(mp1) == 1001)
{ /* Nicklist is scrolling */
switch(SHORT2FROMMP(mp2))
{
case SB_LINEUP:
this_screen->spos--;
break;
case SB_LINEDOWN:
this_screen->spos++;
break;
case SB_PAGEUP:
this_screen->spos -= this_screen->li;
break;
case SB_PAGEDOWN:
this_screen->spos += this_screen->li;
break;
case SB_SLIDERPOSITION:
case SB_SLIDERTRACK:
this_screen->spos=SHORT1FROMMP(mp2);
break;
}
drawnicklist(this_screen);
}
break;
case WM_USER:
dont_resize=1;
if(this_screen->hwndMenu==(HWND)NULL)
{
WinSetWindowPos(this_screen->hwndFrame, HWND_TOP, 0, 0, (this_screen->VIO_font_width * this_screen->nicklist) + cx + (cxsb*2) + (cxvs+(this_screen->nicklist ? cxvs : 0)), cy + (cysb*2) + cytb + 1, SWP_SIZE);
}
else
{
WinQueryWindowPos(this_screen->hwndMenu, &menupos);
if(menupos.cy<3)
WinSetWindowPos(this_screen->hwndFrame, HWND_TOP, 0, 0, (this_screen->VIO_font_width * this_screen->nicklist) + cx + (cxvs+(this_screen->nicklist ? cxvs : 0)) + (cxsb*2), cy + (cysb*2)+cytb + WinQuerySysValue(HWND_DESKTOP, SV_CYMENU), SWP_SIZE);
else
WinSetWindowPos(this_screen->hwndFrame, HWND_TOP, 0, 0, (this_screen->VIO_font_width * this_screen->nicklist) + cx + (cxvs+(this_screen->nicklist ? cxvs : 0)) + (cxsb*2), cy + (cysb*2)+cytb + menupos.cy, SWP_SIZE);
}
drawnicklist(this_screen);
sendevent(EVREFRESH, this_screen->current_window->refnum);
break;
case WM_USER+2:
pm_new_window((Screen *)mp1, (Window *)mp2);
break;
case WM_USER+3:
if(mp1)
pm_mdi_on();
else
pm_mdi_off();
break;
case WM_USER+4:
gui_kill_window((Screen *)mp1);
break;
case WM_USER+5:
pm_aboutbox((char *)mp1);
break;
case WM_USER+6:
dont_resize=1;
window_menu_stub((Screen *)mp1, (char *)mp2);
break;
case 0x041e:
if(just_resized == 1 && this_screen == just_resized_screen)
{
WinPostMsg(hwnd, WM_USER, 0, 0);
just_resized=0;
}
break;
case 0x041f:
if(just_resized == 1 && this_screen == just_resized_screen)
{
WinPostMsg(hwnd, WM_USER, 0, 0);
just_resized=0;
}
break;
case WM_MINMAXFRAME:
{
PSWP pSwp = PVOIDFROMMP(mp1);
if(pSwp->fl & SWP_MAXIMIZE)
{
dont_resize=1;
WinPostMsg(hwnd, WM_USER, 0, 0);
}
}
break;
case WM_SIZE:
if (!this_screen) return((MRESULT)0);
x=SHORT1FROMMP(mp2); y=SHORT2FROMMP(mp2);
if(x && y) {
int nx, ny, ncx, ncy;
HDC hdc;
this_screen->old_co = this_screen->co=((int)((x-(cxvs+(this_screen->nicklist ? cxvs : 0)))/this_screen->VIO_font_width)) - this_screen->nicklist;
this_screen->old_li = this_screen->li=((int)(y/this_screen->VIO_font_height));
nx = 0;
ny = 0;
ncx = (x-(cxvs+(this_screen->nicklist ? cxvs : 0))) - (this_screen->nicklist * this_screen->VIO_font_width);
ncy = y;
VioAssociate((HDC)NULL, this_screen->hvps);
WinSetWindowPos(this_screen->hwndLeft, NULLHANDLE, nx, ny-((this_screen->VIO_font_height*VIO_staticy)-ncy), ncx, ncy+abs((this_screen->VIO_font_height*VIO_staticy)-ncy), SWP_MOVE | SWP_SIZE);
hdc = WinOpenWindowDC(this_screen->hwndLeft);
VioAssociate(hdc, this_screen->hvps);
nx += ncx;
ncx = cxvs;
WinSetWindowPos(this_screen->hwndscroll, NULLHANDLE, nx, ny, ncx, ncy, SWP_MOVE | SWP_SIZE);
if(this_screen->nicklist)
{
nx += ncx;
ncx = this_screen->nicklist * this_screen->VIO_font_width;
VioAssociate((HDC)NULL, this_screen->hvpsnick);
WinSetWindowPos(this_screen->hwndRight, NULLHANDLE, nx, ny-((this_screen->VIO_font_height*VIO_staticy)-ncy), ncx, ncy+abs((this_screen->VIO_font_height*VIO_staticy)-ncy), SWP_MOVE | SWP_SIZE);
hdc = WinOpenWindowDC(this_screen->hwndRight);
VioAssociate(hdc, this_screen->hvpsnick);
nx += ncx;
ncx = cxvs;
WinSetWindowPos(this_screen->hwndnickscroll, NULLHANDLE, nx, ny, ncx, ncy, SWP_MOVE | SWP_SIZE);
}
pm_resize(this_screen);
recalculate_windows(this_screen);
make_window_current(this_screen->current_window);
if(dont_resize == 1)
dont_resize = 0;
else
{
just_resized_screen=this_screen;
just_resized=1;
}
}
WinDefAVioWindowProc(hwnd, msg, (ULONG)mp1, (ULONG)mp2);
break;
}
return WinDefWindowProc(hwnd, msg, mp1, mp2);
}
MRESULT EXPENTRY MDIWndProc( HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2 )
{
switch( msg )
{
case WM_PAINT:
{
HPS hps;
RECTL rc;
hps = WinBeginPaint( hwnd, 0L, &rc );
WinFillRect(hps, &rc, CLR_DARKGRAY);
WinEndPaint( hps );
break;
}
case WM_SIZE:
{
Screen *tmp = screen_list;
ULONG oldheight = WinQueryWindowULong(MDIFrame, QWP_USER);
if(!SHORT1FROMMP(mp2) && !SHORT2FROMMP(mp2))
return NULL;
if(oldheight && (oldheight-SHORT2FROMMP(mp2)))
{
while(tmp)
{
if(tmp->alive)
{
SWP swp;
WinQueryWindowPos(tmp->hwndFrame, &swp);
WinSetWindowPos(tmp->hwndFrame,0, swp.x, swp.y - (oldheight-SHORT2FROMMP(mp2)), 0, 0, SWP_MOVE);
}
tmp = tmp->next;
}
}
WinSetWindowULong(MDIFrame, QWP_USER, SHORT2FROMMP(mp2));
}
break;
case WM_CLOSE:
irc_exit(1, NULL, "%s exiting", VERSION);
break;
default:
return WinDefWindowProc( hwnd, msg, mp1, mp2 );
}
return (MRESULT)FALSE;
}
void avio_exit(void) {
VioAssociate((HDC)NULL, (output_screen ? output_screen->hvps : hvps));
VioDestroyPS((output_screen ? output_screen->hvps : hvps));
WinDestroyWindow(hwndFrame);
WinDestroyMsgQueue(hmq);
WinTerminate(hab);
DosExit(EXIT_PROCESS, 0);
}
void avio_init() {
HEV mySem = sem;
PMYWINDATA mywindata;
ULONG flStyle = FCF_MINMAX | FCF_SYSMENU | FCF_TITLEBAR |
FCF_SIZEBORDER | FCF_SHELLPOSITION | FCF_TASKLIST | FCF_ICON;
pmthread = *_threadid;
DosOpenEventSem(NULL, (PHEV)&mySem);
hab = WinInitialize(0);
hmq = WinCreateMsgQueue(hab, 0);
cxvs = WinQuerySysValue(HWND_DESKTOP, SV_CXVSCROLL);
cxsb = WinQuerySysValue(HWND_DESKTOP, SV_CXSIZEBORDER);
cysb = WinQuerySysValue(HWND_DESKTOP, SV_CYSIZEBORDER);
cytb = WinQuerySysValue(HWND_DESKTOP, SV_CYTITLEBAR);
if (!WinRegisterClass(hab, "AVIO", GenericWndProc, CS_SIZEREDRAW, 32))
DosExit(EXIT_PROCESS, 1);
WinRegisterClass(hab, "BXMDI", MDIWndProc, CS_SIZEREDRAW | CS_CLIPCHILDREN, 0);
MDIFrame = WinCreateStdWindow(HWND_DESKTOP,
WS_CLIPCHILDREN,
&flStyle,
"BXMDI",
irc_version,
WS_CLIPCHILDREN,
NULLHANDLE,
IDM_MAINMENU,
&MDIClient);
hwndFrame = WinCreateStdWindow(HWND_DESKTOP,
0,
&flStyle,
"AVIO",
irc_version,
0L,
NULLHANDLE,
IDM_MAINMENU,
&hwndClient);
hwndLeft = WinCreateWindow(hwndClient,
WC_FRAME,
NULL,
WS_VISIBLE,
0,0,2000,1000,
hwndClient,
HWND_TOP,
0L,
NULL,
NULL);
hwndRight = WinCreateWindow(hwndClient,
WC_FRAME,
NULL,
WS_VISIBLE,
0,0,2000,1000,
hwndClient,
HWND_TOP,
0L,
NULL,
NULL);
hwndscroll = WinCreateWindow(hwndClient,
WC_SCROLLBAR,
NULL,
WS_VISIBLE | SBS_VERT,
0,0,100,100,
hwndClient,
HWND_TOP,
1000L,
NULL,
NULL);
hwndnickscroll = WinCreateWindow(hwndClient,
WC_SCROLLBAR,
NULL,
WS_VISIBLE | SBS_VERT,
0,0,100,100,
hwndClient,
HWND_TOP,
1001L,
NULL,
NULL);
hwndMenu=(HWND)NULL;
current_term->co = current_term->TI_cols = 81;
current_term->li = current_term->TI_lines = 25;
cx = (current_term->co+14) * VIO_font_width;
cy = current_term->li * VIO_font_height;
WinSetParent(MDIFrame, HWND_OBJECT, FALSE);
/* Setup main window */
hdc = WinOpenWindowDC(hwndLeft);
VioCreatePS(&hvps, VIO_staticy, VIO_staticx, 0,
1, 0);
VioAssociate(hdc, hvps);
/* Setup nicklist */
hdc = WinOpenWindowDC(hwndRight);
VioCreatePS(&hvpsnick, VIO_staticy, VIO_staticx, 0,
1, 0);
VioAssociate(hdc, hvpsnick);
cursor_off(hvpsnick);
VIO_font_width=6;VIO_font_height=10;
/* Set font size */
VioSetDeviceCellSize(VIO_font_height, VIO_font_width, hvps);
VioSetDeviceCellSize(VIO_font_height, VIO_font_width, hvpsnick);
DosPostEventSem(mySem);
DosCloseEventSem(mySem);
WinSendMsg(hwndscroll, SBM_SETSCROLLBAR, (MPARAM)get_int_var(SCROLLBACK_VAR), MPFROM2SHORT(0, get_int_var(SCROLLBACK_VAR)));
DosCreateMutexSem(NULL, &mutex, 0, FALSE);
lastclicklinedata = new_malloc(500);
mywindata = new_malloc(sizeof(MYWINDATA));
memset(mywindata, '\0', sizeof(MYWINDATA));
mywindata->hvps = hvps;
mywindata->screen = NULL;
WinSetWindowPtr(hwndClient, QWP_USER, mywindata);
WinSetWindowPtr(hwndLeft, QWP_USER, mywindata);
WinSetWindowPtr(hwndRight, QWP_USER, mywindata);
WinSubclassWindow(hwndLeft, FrameWndProc);
WinSubclassWindow(hwndRight, FrameWndProc);
WinSendMsg(hwndnickscroll, SBM_SETSCROLLBAR, (MPARAM)0, MPFROM2SHORT(0, current_term->li));
WinSendMsg(hwndnickscroll, SBM_SETTHUMBSIZE, MPFROM2SHORT(current_term->li, 0), (MPARAM)NULL);
setmode(guiipc[0], O_BINARY);
setmode(guiipc[1], O_BINARY);
while (WinGetMsg(hab, &qmsg, (HWND)NULL, 0, 0))
WinDispatchMsg(hab, &qmsg);
}
void load_default_font(Screen *font_screen)
{
char *fontsize, *height, *width;
int t, cy, cx;
SWP menupos;
if((fontsize=get_string_var(DEFAULT_FONT_VAR))!=NULL)
{
width=new_malloc(10);
strcpy(width, fontsize);
t=0;
while(width[t]!='x' && t<9)
t++;
height=&width[t+1];
width[t]=0;
VIO_font_width=atoi(width);
VIO_font_height=atoi(height);
new_free(&width);
if (VIO_font_width < 6 || VIO_font_height < 8)
{
VIO_font_width=6;VIO_font_height=10;
}
}
else
{
VIO_font_width=6;VIO_font_height=10;
}
font_screen->VIO_font_width=VIO_font_width;
font_screen->VIO_font_height=VIO_font_height;
if(VIO_font_width != 6 || VIO_font_height != 10)
{
cx = (font_screen->co - 1) * font_screen->VIO_font_width;
cy = font_screen->li * font_screen->VIO_font_height;
cx += font_screen->VIO_font_width * font_screen->nicklist;
if(font_screen->nicklist)
cx += cxvs;
VioSetDeviceCellSize(font_screen->VIO_font_height, font_screen->VIO_font_width, font_screen->hvps); /* Set the font size */
VioSetDeviceCellSize(font_screen->VIO_font_height, font_screen->VIO_font_width, font_screen->hvpsnick);
if(font_screen->hwndMenu==(HWND)NULL)
WinSetWindowPos(font_screen->hwndFrame, HWND_TOP, 0, 0, cx+(cxsb*2)+1, cy+(cysb+cytb), SWP_SIZE);
else
{
WinQueryWindowPos(font_screen->hwndMenu, &menupos);
WinSetWindowPos(font_screen->hwndFrame, HWND_TOP, 0, 0, cx+(cxsb*2)+cxvs, cy+(cysb*2)+cytb+menupos.cy, SWP_SIZE);
}
}
}
/* Individual Page Procs */
MRESULT EXPENTRY NotebookPage1DlgProc(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2)
{
char szBuffer[1024];
int i;
char *ptr;
switch (msg)
{
/* Perform dialog initialization */
case WM_INITDLG:
WinSetDlgItemText(hWnd, EF_ENTRY1, "");
p1e=LIT_NONE;
break;
/* Process control selections */
case WM_CONTROL:
switch(SHORT1FROMMP(mp1))
{
case SETS1:
if(p1e!=LIT_NONE)
{
switch(return_irc_var(p1e)->type)
{
case BOOL_TYPE_VAR:
i = (ULONG)WinSendMsg(WinWindowFromID(hWnd, CB_ONOFF1),
BM_QUERYCHECK,
0,
0);
set_int_var(p1e, i);
break;
case CHAR_TYPE_VAR:
WinQueryDlgItemText(hWnd, EF_ENTRY1, 1024L, szBuffer);
set_string_var(p1e, szBuffer);
break;
case STR_TYPE_VAR:
WinQueryDlgItemText(hWnd, EF_ENTRY1, 1024L, szBuffer);
set_string_var(p1e, szBuffer);
break;
case INT_TYPE_VAR:
WinQueryDlgItemText(hWnd, EF_ENTRY1, 1024L, szBuffer);
set_int_var(p1e, my_atol((char *)&szBuffer));
break;
}
}
p1e = (ULONG)WinSendMsg(WinWindowFromID(hWnd, SETS1),
LM_QUERYSELECTION,
MPFROMSHORT(LIT_CURSOR),
0);
if(p1e!=LIT_NONE)
{
switch(return_irc_var(p1e)->type)
{
case BOOL_TYPE_VAR:
WinEnableWindow(WinWindowFromID(hWnd, CB_ONOFF1), TRUE);
WinEnableWindow(WinWindowFromID(hWnd, EF_ENTRY1), FALSE);
i = get_int_var(p1e);
WinSendMsg(WinWindowFromID(hWnd, CB_ONOFF1),BM_SETCHECK,MPFROMSHORT(i),0);
WinSetDlgItemText(hWnd, EF_ENTRY1, "");
break;
case INT_TYPE_VAR:
WinEnableWindow(WinWindowFromID(hWnd, CB_ONOFF1), FALSE);
WinEnableWindow(WinWindowFromID(hWnd, EF_ENTRY1), TRUE);
sprintf(szBuffer, "%d", get_int_var(p1e));
WinSetDlgItemText(hWnd, EF_ENTRY1, szBuffer);
break;
case STR_TYPE_VAR:
WinEnableWindow(WinWindowFromID(hWnd, CB_ONOFF1), FALSE);
WinEnableWindow(WinWindowFromID(hWnd, EF_ENTRY1), TRUE);
ptr=get_string_var(p1e);
if(ptr && *ptr)
strcpy(szBuffer, ptr);
else
strcpy(szBuffer, empty_string);
WinSetDlgItemText(hWnd, EF_ENTRY1, szBuffer);
break;
case CHAR_TYPE_VAR:
WinEnableWindow(WinWindowFromID(hWnd, CB_ONOFF1), FALSE);
WinEnableWindow(WinWindowFromID(hWnd, EF_ENTRY1), TRUE);
ptr = get_string_var(p1e);
if(ptr && *ptr)
strcpy(szBuffer, ptr);
else
strcpy(szBuffer, empty_string);
WinSetDlgItemText(hWnd, EF_ENTRY1, szBuffer);
break;
}
}
break;
}
break;
/* Process push button selections */
case WM_COMMAND:
switch ( SHORT1FROMMP(mp1) )
{
case DID_OK:
if(p1e!=LIT_NONE)
{
switch(return_irc_var(p1e)->type)
{
case BOOL_TYPE_VAR:
i = (ULONG)WinSendMsg(WinWindowFromID(hWnd, CB_ONOFF1),BM_QUERYCHECK,0,0);
set_int_var(p1e, i);
break;
case CHAR_TYPE_VAR:
WinQueryDlgItemText(hWnd, EF_ENTRY1, 1024L, szBuffer);
set_string_var(p1e, szBuffer);
break;
case STR_TYPE_VAR:
WinQueryDlgItemText(hWnd, EF_ENTRY1, 1024L, szBuffer);
set_string_var(p1e, szBuffer);
break;
case INT_TYPE_VAR:
WinQueryDlgItemText(hWnd, EF_ENTRY1, 1024L, szBuffer);
set_int_var(p1e, my_atol((char *)&szBuffer));
break;
}
}
break;
}
break;
/* Close requested, exit dialogue */
case WM_CLOSE:
WinDismissDlg(hWnd, FALSE);
break;
/* Pass through unhandled messages */
default:
return(WinDefDlgProc(hWnd, msg, mp1, mp2));
}
return(0L);
}
MRESULT EXPENTRY NotebookPage2DlgProc(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2)
{
char szBuffer[1024];
int i;
char *ptr;
switch (msg)
{
/* Perform dialog initialization */
case WM_INITDLG :
WinSetDlgItemText(hWnd, EF_ENTRY2, "");
if(nb_window && nb_window->current_channel)
chan = (ChannelList *) find_in_list((List **)get_server_channels(from_server), nb_window->current_channel, 0);
else
chan = NULL;
p2e=LIT_NONE;
break;
/* Process control selections */
case WM_CONTROL:
switch(SHORT1FROMMP(mp1))
{
case SETS2:
if(p2e!=LIT_NONE && chan)
{
switch(return_cset_var(p2e)->type)
{
case BOOL_TYPE_VAR:
i = (ULONG)WinSendMsg(WinWindowFromID(hWnd, CB_ONOFF2),
BM_QUERYCHECK,
0,
0);
set_cset_int_var(chan->csets, p2e, i);
break;
case CHAR_TYPE_VAR:
WinQueryDlgItemText(hWnd, EF_ENTRY2, 1024L, szBuffer);
set_cset_str_var(chan->csets, p2e, szBuffer);
break;
case STR_TYPE_VAR:
WinQueryDlgItemText(hWnd, EF_ENTRY2, 1024L, szBuffer);
set_cset_str_var(chan->csets, p2e, szBuffer);
break;
case INT_TYPE_VAR:
WinQueryDlgItemText(hWnd, EF_ENTRY2, 1024L, szBuffer);
set_cset_int_var(chan->csets, p2e, my_atol((char *)&szBuffer));
break;
}
}
p2e = (ULONG)WinSendMsg(WinWindowFromID(hWnd, SETS2),
LM_QUERYSELECTION,
MPFROMSHORT(LIT_CURSOR),
0);
if(p2e!=LIT_NONE && chan)
{
switch(return_cset_var(p2e)->type)
{
case BOOL_TYPE_VAR:
WinEnableWindow(WinWindowFromID(hWnd, CB_ONOFF2), TRUE);
WinEnableWindow(WinWindowFromID(hWnd, EF_ENTRY2), FALSE);
i = get_cset_int_var(chan->csets, p2e);
WinSendMsg(WinWindowFromID(hWnd, CB_ONOFF2),
BM_SETCHECK,
MPFROMSHORT(i),
0);
WinSetDlgItemText(hWnd, EF_ENTRY2, empty_string);
break;
case INT_TYPE_VAR:
WinEnableWindow(WinWindowFromID(hWnd, CB_ONOFF2), FALSE);
WinEnableWindow(WinWindowFromID(hWnd, EF_ENTRY2), TRUE);
sprintf(szBuffer, "%d", get_cset_int_var(chan->csets, p2e));
WinSetDlgItemText(hWnd, EF_ENTRY2, szBuffer);
break;
case STR_TYPE_VAR:
WinEnableWindow(WinWindowFromID(hWnd, CB_ONOFF2), FALSE);
WinEnableWindow(WinWindowFromID(hWnd, EF_ENTRY2), TRUE);
ptr=get_cset_str_var(chan->csets, p2e);
if(ptr && *ptr)
strcpy(szBuffer, ptr);
else
strcpy(szBuffer, empty_string);
WinSetDlgItemText(hWnd, EF_ENTRY2, szBuffer);
break;
case CHAR_TYPE_VAR:
WinEnableWindow(WinWindowFromID(hWnd, CB_ONOFF2), FALSE);
WinEnableWindow(WinWindowFromID(hWnd, EF_ENTRY2), TRUE);
ptr = get_cset_str_var(chan->csets, p2e);
if(ptr && *ptr)
strcpy(szBuffer, ptr);
else
strcpy(szBuffer, empty_string);
WinSetDlgItemText(hWnd, EF_ENTRY2, szBuffer);
break;
}
}
break;
}
break;
/* Process push button selections */
case WM_COMMAND:
switch (SHORT1FROMMP(mp1))
{
case DID_OK :
if(p2e!=LIT_NONE && chan)
{
switch(return_cset_var(p2e)->type)
{
case BOOL_TYPE_VAR:
i = (ULONG)WinSendMsg(WinWindowFromID(hWnd, CB_ONOFF2),
BM_QUERYCHECK,
0,
0);
set_cset_int_var(chan->csets, p2e, i);
break;
case CHAR_TYPE_VAR:
WinQueryDlgItemText(hWnd, EF_ENTRY2, 1024L, szBuffer);
set_cset_str_var(chan->csets, p2e, szBuffer);
break;
case STR_TYPE_VAR:
WinQueryDlgItemText(hWnd, EF_ENTRY2, 1024L, szBuffer);
set_cset_str_var(chan->csets, p2e, szBuffer);
break;
case INT_TYPE_VAR:
WinQueryDlgItemText(hWnd, EF_ENTRY2, 1024L, szBuffer);
set_cset_int_var(chan->csets, p2e, my_atol((char *)&szBuffer));
break;
}
}
break;
}
break;
/* Close requested, exit dialogue */
case WM_CLOSE:
WinDismissDlg(hWnd, FALSE);
break;
/* Pass through unhandled messages */
default:
return(WinDefDlgProc(hWnd, msg, mp1, mp2));
}
return(0L);
}
MRESULT EXPENTRY NotebookPage3DlgProc(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2)
{
char szBuffer[1024]; /* String Buffer */
char *ptr;
switch ( msg )
{
/* Perform dialog initialization */
case WM_INITDLG :
WinSetDlgItemText(hWnd, EF_ENTRY3, empty_string);
p3e=LIT_NONE;
break;
/* Process control selections */
case WM_CONTROL:
switch(SHORT1FROMMP(mp1))
{
case SETS3:
if(p3e!=LIT_NONE)
{
WinQueryDlgItemText(hWnd, EF_ENTRY3, 1024L, szBuffer);
fset_string_var(p3e, szBuffer);
}
p3e = (ULONG)WinSendMsg(WinWindowFromID(hWnd, SETS3),
LM_QUERYSELECTION,
MPFROMSHORT(LIT_CURSOR),
0);
if(p3e!=LIT_NONE)
{
WinEnableWindow(WinWindowFromID(hWnd, CB_ONOFF3), FALSE);
WinEnableWindow(WinWindowFromID(hWnd, EF_ENTRY3), TRUE);
ptr=fget_string_var(p3e);
if(ptr && *ptr)
strcpy(szBuffer, ptr);
else
strcpy(szBuffer, empty_string);
WinSetDlgItemText(hWnd, EF_ENTRY3, szBuffer);
}
break;
}
break;
/* Process push button selections */
case WM_COMMAND:
switch ( SHORT1FROMMP(mp1) )
{
case DID_OK :
if(p3e!=LIT_NONE)
{
WinQueryDlgItemText(hWnd, EF_ENTRY3, 1024L, szBuffer);
fset_string_var(p3e, szBuffer);
}
break;
}
break;
/* Close requested, exit dialogue */
case WM_CLOSE:
WinDismissDlg(hWnd, FALSE);
break;
/* Pass through unhandled messages */
default:
return(WinDefDlgProc(hWnd, msg, mp1, mp2));
}
return(0L);
}
MRESULT EXPENTRY NotebookPage4DlgProc(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2)
{
char szBuffer[1024]; /* String Buffer */
char *ptr;
switch (msg)
{
/* Perform dialog initialization */
case WM_INITDLG :
WinSetDlgItemText(hWnd, EF_ENTRY4, empty_string);
p4e=LIT_NONE;
break;
/* Process control selections */
case WM_CONTROL :
switch(SHORT1FROMMP(mp1))
{
case SETS4:
if(p4e!=LIT_NONE && nb_window)
{
WinQueryDlgItemText(hWnd, EF_ENTRY4, 1024L, szBuffer);
set_wset_string_var(nb_window->wset, p4e, szBuffer);
}
p4e = (ULONG)WinSendMsg(WinWindowFromID(hWnd, SETS4),
LM_QUERYSELECTION,
MPFROMSHORT(LIT_CURSOR),
0);
if(p4e!=LIT_NONE && nb_window)
{
WinEnableWindow(WinWindowFromID(hWnd, CB_ONOFF4), FALSE);
WinEnableWindow(WinWindowFromID(hWnd, EF_ENTRY4), TRUE);
ptr=get_wset_string_var(nb_window->wset, p4e);
if(ptr && *ptr)
strcpy(szBuffer, ptr);
else
strcpy(szBuffer, empty_string);
WinSetDlgItemText(hWnd, EF_ENTRY4, szBuffer);
}
break;
}
break;
/* Process push button selections */
case WM_COMMAND :
switch ( SHORT1FROMMP(mp1) )
{
case DID_OK :
if(p4e!=LIT_NONE && nb_window)
{
WinQueryDlgItemText(hWnd, EF_ENTRY4, 1024L, szBuffer);
set_wset_string_var(nb_window->wset, p4e, szBuffer);
}
break;
}
break;
/* Close requested, exit dialogue */
case WM_CLOSE :
WinDismissDlg(hWnd, FALSE);
break;
/* Pass through unhandled messages */
default :
return(WinDefDlgProc(hWnd, msg, mp1, mp2));
}
return(0L);
}
MRESULT EXPENTRY NotebookPage5DlgProc(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2)
{
switch (msg)
{
case WM_CHAR :
break;
/* Perform dialog initialization */
case WM_INITDLG :
break;
/* Process control selections */
case WM_CONTROL :
switch ( SHORT2FROMMP(mp1) )
{
}
break;
/* Process push button selections */
case WM_COMMAND :
switch ( SHORT1FROMMP(mp1) )
{
case DID_OK :
break;
}
break;
/* Close requested, exit dialogue */
case WM_CLOSE :
WinDismissDlg(hWnd, FALSE);
break;
/* Pass through unhandled messages */
default :
return(WinDefDlgProc(hWnd, msg, mp1, mp2));
}
return(0L);
}
MRESULT EXPENTRY NotebookDlgProc(HWND hWnd, ULONG msg, MPARAM mp1, MPARAM mp2)
{
HPS hPS; /* Temporary Presentation Space */
HWND hwndNBK; /* Notebook Window Handle */
PVOID ppb; /* Dialogue Template Pointer */
RECTL rcl; /* Rectangle Holder */
ULONG ulPageID; /* Inserted Page ID */
int t;
char szBuffer[200];
switch ( msg )
{
/* Perform dialog initialization */
case WM_INITDLG:
inproperties=1;
nb_window=current_window;
GpiQueryFontMetrics(hPS = WinGetPS(hWnd), sizeof(FONTMETRICS), &fm);
if(nb_window->current_channel)
sprintf(szBuffer, "PMBitchX Properties for %s", nb_window->current_channel);
else
strcpy(szBuffer, "PMBitchX Properties");
hwndNBK = WinWindowFromID(hWnd, ID_PROP);
WinSetWindowText(WinWindowFromID(hWnd, FID_TITLEBAR), szBuffer);
/* Page 1 - Sets */
ulPageID = (ULONG)WinSendMsg(hwndNBK, BKM_INSERTPAGE, 0L,
MPFROM2SHORT((BKA_STATUSTEXTON | BKA_AUTOPAGESIZE | BKA_MAJOR), BKA_LAST));
WinSendMsg(hwndNBK, BKM_SETSTATUSLINETEXT,
MPFROMLONG(ulPageID), MPFROMP("Page 1 of 5"));
WinSendMsg(hwndNBK, BKM_SETTABTEXT,
MPFROMLONG(ulPageID), MPFROMP("~Sets"));
DosGetResource((HMODULE)NULL, RT_DIALOG, NBKP_SETS1, (PPVOID)&ppb);
hwndPage1 = WinCreateDlg(HWND_DESKTOP, (HWND)NULL, (PFNWP)NotebookPage1DlgProc,
(PDLGTEMPLATE)ppb, NULL);
DosFreeResource((PVOID)ppb);
WinSendMsg(hwndNBK, BKM_SETPAGEWINDOWHWND,
MPFROMLONG(ulPageID), MPFROMHWND(hwndPage1));
/* Page 2 - Csets */
ulPageID = (ULONG)WinSendMsg(hwndNBK, BKM_INSERTPAGE, 0L,
MPFROM2SHORT((BKA_STATUSTEXTON | BKA_AUTOPAGESIZE | BKA_MAJOR), BKA_LAST));
WinSendMsg(hwndNBK, BKM_SETSTATUSLINETEXT,
MPFROMLONG(ulPageID), MPFROMP("Page 2 of 5"));
WinSendMsg(hwndNBK, BKM_SETTABTEXT,
MPFROMLONG(ulPageID), MPFROMP("~Csets"));
DosGetResource((HMODULE)NULL, RT_DIALOG, NBKP_SETS2, (PPVOID)&ppb);
hwndPage2 = WinCreateDlg(HWND_DESKTOP, (HWND)NULL, (PFNWP)NotebookPage2DlgProc,
(PDLGTEMPLATE)ppb, NULL);
DosFreeResource((PVOID)ppb);
WinSendMsg(hwndNBK, BKM_SETPAGEWINDOWHWND,
MPFROMLONG(ulPageID), MPFROMHWND(hwndPage2));
/* Page 3 - Fsets */
ulPageID = (ULONG)WinSendMsg(hwndNBK, BKM_INSERTPAGE, 0L,
MPFROM2SHORT((BKA_STATUSTEXTON | BKA_AUTOPAGESIZE | BKA_MAJOR), BKA_LAST));
WinSendMsg(hwndNBK, BKM_SETSTATUSLINETEXT,
MPFROMLONG(ulPageID), MPFROMP("Page 3 of 5"));
WinSendMsg(hwndNBK, BKM_SETTABTEXT,
MPFROMLONG(ulPageID), MPFROMP("~Fsets"));
DosGetResource((HMODULE)NULL, RT_DIALOG, NBKP_SETS3, (PPVOID)&ppb);
hwndPage3 = WinCreateDlg(HWND_DESKTOP, (HWND)NULL, (PFNWP)NotebookPage3DlgProc,
(PDLGTEMPLATE)ppb, NULL);
DosFreeResource((PVOID)ppb);
WinSendMsg(hwndNBK, BKM_SETPAGEWINDOWHWND,
MPFROMLONG(ulPageID), MPFROMHWND(hwndPage3));
/* Page 4 - Wsets */
ulPageID = (ULONG)WinSendMsg(hwndNBK, BKM_INSERTPAGE, 0L,
MPFROM2SHORT((BKA_STATUSTEXTON | BKA_AUTOPAGESIZE | BKA_MAJOR), BKA_LAST));
WinSendMsg(hwndNBK, BKM_SETSTATUSLINETEXT,
MPFROMLONG(ulPageID), MPFROMP("Page 4 of 5"));
WinSendMsg(hwndNBK, BKM_SETTABTEXT,
MPFROMLONG(ulPageID), MPFROMP("~Wsets"));
DosGetResource((HMODULE)NULL, RT_DIALOG, NBKP_SETS4, (PPVOID)&ppb);
hwndPage4 = WinCreateDlg(HWND_DESKTOP, (HWND)NULL, (PFNWP)NotebookPage4DlgProc,
(PDLGTEMPLATE)ppb, NULL);
DosFreeResource((PVOID)ppb);
WinSendMsg(hwndNBK, BKM_SETPAGEWINDOWHWND,
MPFROMLONG(ulPageID), MPFROMHWND(hwndPage4));
/* Page 5 - OS/2 Settings */
ulPageID = (ULONG)WinSendMsg(hwndNBK, BKM_INSERTPAGE, 0L,
MPFROM2SHORT((BKA_STATUSTEXTON | BKA_AUTOPAGESIZE | BKA_MAJOR), BKA_LAST));
WinSendMsg(hwndNBK, BKM_SETSTATUSLINETEXT,
MPFROMLONG(ulPageID), MPFROMP("Page 5 of 5"));
WinSendMsg(hwndNBK, BKM_SETTABTEXT,
MPFROMLONG(ulPageID), MPFROMP("~OS/2 Settings"));
DosGetResource((HMODULE)NULL, RT_DIALOG, NBKP_OSSETTINGS, (PPVOID)&ppb);
hwndPage5 = WinCreateDlg(HWND_DESKTOP, (HWND)NULL, (PFNWP)NotebookPage4DlgProc,
(PDLGTEMPLATE)ppb, NULL);
DosFreeResource((PVOID)ppb);
WinSendMsg(hwndNBK, BKM_SETPAGEWINDOWHWND,
MPFROMLONG(ulPageID), MPFROMHWND(hwndPage5));
rcl.xLeft = rcl.yBottom = 0L;
rcl.xRight = rcl.yTop = 400L;
WinDrawText(hPS = WinGetPS(hWnd), -1, " Second Page ", &rcl, CLR_BLACK, CLR_BLACK,
DT_LEFT | DT_BOTTOM | DT_QUERYEXTENT);
WinReleasePS(hPS);
WinSendMsg(hwndNBK, BKM_SETDIMENSIONS,
MPFROM2SHORT((SHORT)(rcl.xRight - rcl.xLeft), (SHORT)(fm.lMaxBaselineExt * 2)),
MPFROMSHORT(BKA_MAJORTAB));
/* Set the dimension of the notebook buttons */
WinSendMsg(hwndNBK, BKM_SETDIMENSIONS, MPFROM2SHORT(21, 21),
MPFROMLONG(BKA_PAGEBUTTON));
/* Set the background colours to that of the dialog */
WinSendMsg(hwndNBK, BKM_SETNOTEBOOKCOLORS, MPFROMLONG(SYSCLR_DIALOGBACKGROUND),
MPFROMLONG(BKA_BACKGROUNDPAGECOLORINDEX));
WinSendMsg(hwndNBK, BKM_SETNOTEBOOKCOLORS, MPFROMLONG(SYSCLR_DIALOGBACKGROUND),
MPFROMLONG(BKA_BACKGROUNDMAJORCOLORINDEX));
for(t=0; t<NUMBER_OF_VARIABLES; t++)
{
WinSendMsg(WinWindowFromID(hwndPage1, SETS1),
LM_INSERTITEM,
MPFROMSHORT(LIT_END),
MPFROMP(return_irc_var(t)->name));
}
for(t=0; t<NUMBER_OF_CSETS; t++)
{
WinSendMsg(WinWindowFromID(hwndPage2, SETS2),
LM_INSERTITEM,
MPFROMSHORT(LIT_END),
MPFROMP(return_cset_var(t)->name));
}
for(t=0; t<NUMBER_OF_FSET; t++)
{
WinSendMsg(WinWindowFromID(hwndPage3, SETS3),
LM_INSERTITEM,
MPFROMSHORT(LIT_END),
MPFROMP(return_fset_var(t)->name));
}
for(t=0; t<NUMBER_OF_WSETS; t++)
{
WinSendMsg(WinWindowFromID(hwndPage4, SETS4),
LM_INSERTITEM,
MPFROMSHORT(LIT_END),
MPFROMP(return_wset_var(t)->name));
}
break;
case WM_COMMAND :
switch (SHORT1FROMMP(mp1))
{
case DID_OK :
WinSendMsg(hwndPage1, WM_COMMAND,
MPFROMLONG(DID_OK), MPFROMLONG(CMDSRC_OTHER));
WinSendMsg(hwndPage2, WM_COMMAND,
MPFROMLONG(DID_OK), MPFROMLONG(CMDSRC_OTHER));
WinSendMsg(hwndPage3, WM_COMMAND,
MPFROMLONG(DID_OK), MPFROMLONG(CMDSRC_OTHER));
WinSendMsg(hwndPage4, WM_COMMAND,
MPFROMLONG(DID_OK), MPFROMLONG(CMDSRC_OTHER));
inproperties=0;
WinDismissDlg(hWnd, TRUE);
break;
}
break;
/* Close requested, exit dialogue */
case WM_CLOSE :
inproperties=0;
WinDismissDlg(hWnd, FALSE);
break;
/* Pass through unhandled messages */
default :
return(WinDefDlgProc(hWnd, msg, mp1, mp2));
}
return(0L);
}
void properties_notebook(void)
{
HAB hnbab;
HMQ hnbmq;
hnbab = WinInitialize(0);
hnbmq = WinCreateMsgQueue(hnbab, 0);
if(inproperties==0)
WinDlgBox(HWND_DESKTOP, HWND_DESKTOP, NotebookDlgProc, NULLHANDLE, PROPNBK, NULL);
WinDestroyMsgQueue(hnbmq);
WinTerminate(hnbab);
}
void msgbox(void)
{
HAB hmbab;
HMQ hmbmq;
hmbab = WinInitialize(0);
hmbmq = WinCreateMsgQueue(hmbab, 0);
WinMessageBox(HWND_DESKTOP, HWND_DESKTOP, msgtext, "PMBitchX", 0, MB_OK | MB_INFORMATION | MB_MOVEABLE);
new_free(&msgtext);
WinDestroyMsgQueue(hmbmq);
WinTerminate(hmbab);
}
void pm_clrscr(Screen *tmp)
{
VioScrollUp(0, 0, -1, -1, -1, (PBYTE)&default_pair, tmp->hvps);
}
void gui_font_set(char *fontsize, Screen *screen)
{
char *height, *width;
int t;
width=new_malloc(10);
strcpy(width, fontsize);
t=0;
while(width[t]!='x' && t<9)
t++;
height=&width[t+1];
width[t]=0;
VIO_font_width=atoi(width);
VIO_font_height=atoi(height);
new_free(&width);
if (VIO_font_width < 6 || VIO_font_height < 8)
{
VIO_font_width=6;VIO_font_height=10;
}
if(VioSetDeviceCellSize(VIO_font_height, VIO_font_width, screen->hvps)!=NO_ERROR)
{
VIO_font_width = screen->VIO_font_width;
VIO_font_height = screen->VIO_font_height;
}
else
{
VioSetDeviceCellSize(VIO_font_height, VIO_font_width, screen->hvpsnick);
screen->VIO_font_width = VIO_font_width;
screen->VIO_font_height = VIO_font_height;
}
}
void gui_font_init(void)
{
char *fontsize;
int cy, cx, containerh, codepage = 0;
VIO_font_width=6;VIO_font_height=10;
main_screen->VIO_font_width=VIO_font_width;
main_screen->VIO_font_height=VIO_font_height;
if((fontsize=get_string_var(DEFAULT_FONT_VAR))!=NULL)
gui_font_set(fontsize, main_screen);
main_screen->nicklist = get_int_var(NICKLIST_VAR);
main_screen->co = 84; main_screen->li = 25;
cx = (main_screen->co - 1) * main_screen->VIO_font_width;
cy = main_screen->li * main_screen->VIO_font_height;
cx += main_screen->VIO_font_width * main_screen->nicklist;
if(main_screen->nicklist)
cx += cxvs;
WinSetWindowPos(main_screen->hwndFrame, HWND_TOP, 0, 0, 0 ,0, SWP_HIDE);
if(get_int_var(MDI_VAR))
{
SWP swp;
WinQueryWindowPos(MDIClient, &swp);
containerh = swp.cy;
WinSetParent(main_screen->hwndFrame, MDIClient, FALSE);
}
else
{
containerh = WinQuerySysValue(HWND_DESKTOP, SV_CYSCREEN);
WinSetParent(main_screen->hwndFrame, HWND_DESKTOP, FALSE);
}
if(main_screen->hwndMenu==(HWND)NULL)
WinSetWindowPos(main_screen->hwndFrame, HWND_TOP, 32 * main_screen->screennum, containerh - ((32 * main_screen->screennum) + cy + (cysb*2)+cytb), cx+cxsb, cy+(cysb*2)+WinQuerySysValue(HWND_DESKTOP, SV_CYTITLEBAR), SWP_SIZE | SWP_MOVE | SWP_SHOW | SWP_ACTIVATE | SWP_ZORDER);
else
WinSetWindowPos(main_screen->hwndFrame, HWND_TOP, 32 * main_screen->screennum, containerh - ((32 * main_screen->screennum) + cy + (cysb*2)+cytb), cx+cxsb, cy+(cysb*2)+WinQuerySysValue(HWND_DESKTOP, SV_CYTITLEBAR) + WinQuerySysValue(HWND_DESKTOP, SV_CYMENU) + 1, SWP_SIZE | SWP_MOVE | SWP_SHOW | SWP_ACTIVATE | SWP_ZORDER);
if((codepage = get_int_var(DEFAULT_CODEPAGE_VAR)))
{
VioSetCp(0, codepage, main_screen->hvps);
VioSetCp(0, codepage, main_screen->hvpsnick);
WinSetCp(hmq, codepage);
WinSetCp(mainhmq, codepage);
}
DosSleep(1000);
/*if(!get_int_var(SCROLLERBARS_VAR))
WinSetParent();*/
}
/* This section is for portability considerations */
void gui_init(void)
{
LONG add = 100;
ULONG new;
/* Create an unnamed semaphore */
DosCreateEventSem(NULL,
(PHEV)&sem,
DC_SEM_SHARED,
FALSE);
current_term->li = 25;
current_term->co = 80;
#ifdef SOUND
if(DosLoadModule(NULL, 0, "MCIAPI", &hmod) == NO_ERROR)
{
if(DosQueryProcAddr(hmod, 0, "mciPlayFile", (PFN *)&DLL_mciPlayFile) != NO_ERROR)
DLL_mciPlayFile = NULL;
if(DosQueryProcAddr(hmod, 0, "mciSendString", (PFN *)&DLL_mciSendString) != NO_ERROR)
DLL_mciSendString = NULL;
if(DosQueryProcAddr(hmod, 0, "mciGetErrorString", (PFN *)&DLL_mciGetErrorString) != NO_ERROR)
DLL_mciGetErrorString = NULL;
}
#endif
DosSetRelMaxFH(&add, &new);
_beginthread((void *)avio_init, NULL, (4*0xFFFF), main_screen );
_beginthread((void *)flush_thread, NULL, 0xFFFF, &hvps);
_beginthread((void *)cursor_thread, NULL, 0xFFFF, NULL);
DosWaitEventSem(sem, SEM_INDEFINITE_WAIT);
DosCloseEventSem(sem);
default_pair[0] = ' ';
default_pair[1] = 7;
}
void gui_clreol(void)
{
USHORT row, col;
char tmpbuf[201];
aflush();
if(!output_screen)
return;
VioGetCurPos((PUSHORT)&row, (PUSHORT)&col, output_screen->hvps);
if((output_screen->co - col + 1) > 0)
{
memset(tmpbuf, ' ', 200);
tmpbuf[201] = 0;
VioWrtTTY((PCH)tmpbuf, (output_screen->co - col) + 1, output_screen->hvps);
VioSetCurPos((USHORT)row, (USHORT)col, output_screen->hvps);
}
}
void gui_gotoxy(int col, int row)
{
aflush();
VioSetCurPos((USHORT)row, (USHORT)col, output_screen ? output_screen->hvps : hvps);
}
void gui_clrscr(void)
{
Screen *tmp;
aflush();
for (tmp = screen_list; tmp; tmp = tmp->next)
if(tmp->alive)
pm_clrscr(tmp);
}
void gui_left(int num)
{
unsigned int row,col;
aflush();
VioGetCurPos((PUSHORT)&row, (PUSHORT)&col, output_screen ? output_screen->hvps : hvps);
if(col>num)
col=col-num;
else
col=0;
VioSetCurPos((USHORT)row, (USHORT)col, output_screen ? output_screen->hvps : hvps);
}
void gui_right(int num)
{
unsigned int row,col;
aflush();
VioGetCurPos((PUSHORT)&row, (PUSHORT)&col, output_screen->hvps);
if(output_screen->co > num)
col=col+num;
else
col=output_screen->co;
VioSetCurPos((USHORT)row, (USHORT)col, output_screen->hvps);
}
void gui_scroll(int top, int bot, int n)
{
aflush();
if (n > 0) VioScrollUp(top, 0, bot, output_screen->co, n, (PBYTE)&pair, output_screen->hvps);
else if (n < 0) { n = -n; VioScrollDn(top, 0, bot, output_screen->co, n, (PBYTE)&pair, output_screen->hvps); }
return;
}
void gui_flush(void)
{
aflush();
}
void gui_puts(unsigned char *buffer)
{
int i;
for (i = 0; i < strlen(buffer); i++) aputc(buffer[i]);
aputc('\n'); aputc('\r');
}
void gui_new_window(Screen *new, Window *win)
{
WinSendMsg(main_screen->hwndClient, WM_USER+2, MPFROMP(new), MPFROMP(win));
}
void pm_new_window(Screen *new, Window *win)
{
int cx,
cy;
HDC hdc;
ULONG flStyle = FCF_MINMAX | FCF_SYSMENU | FCF_TITLEBAR | FCF_SIZEBORDER | FCF_ICON;
PMYWINDATA windata;
MenuStruct *menutoadd;
char *defmenu, *fontsize, *width, *height;
int t, containerh, codepage = 0;
windata = new_malloc(sizeof(MYWINDATA));
memset(windata, '\0', sizeof(MYWINDATA));
if(!get_int_var(MDI_VAR))
flStyle |= FCF_TASKLIST;
new->hwndFrame = WinCreateStdWindow(HWND_DESKTOP,
0,
&flStyle,
"AVIO",
irc_version,
0L,
NULLHANDLE,
IDM_MAINMENU,
&new->hwndClient);
WinSetWindowPtr(new->hwndClient, QWP_USER, NULL);
new->hwndLeft = WinCreateWindow(new->hwndClient,
WC_FRAME,
NULL,
WS_VISIBLE,
0,0,2000,1000,
new->hwndClient,
HWND_TOP,
0L,
NULL,
NULL);
new->hwndRight = WinCreateWindow(new->hwndClient,
WC_FRAME,
NULL,
WS_VISIBLE,
0,0,2000,1000,
new->hwndClient,
HWND_TOP,
0L,
NULL,
NULL);
new->hwndscroll = WinCreateWindow(new->hwndClient,
WC_SCROLLBAR,
NULL,
WS_VISIBLE | SBS_VERT,
0,0,100,100,
new->hwndClient,
HWND_TOP,
1000L,
NULL,
NULL);
new->hwndnickscroll = WinCreateWindow(new->hwndClient,
WC_SCROLLBAR,
NULL,
WS_VISIBLE | SBS_VERT,
0,0,100,100,
new->hwndClient,
HWND_TOP,
1001L,
NULL,
NULL);
if (main_screen)
{
new->co = main_screen->co;
new->li = main_screen->li;
}
else
{
new->co = 81;
new->li = 25;
}
if (main_screen)
{
new->VIO_font_width = main_screen->VIO_font_width;
new->VIO_font_height = main_screen->VIO_font_height;
}
else
{
new->VIO_font_width = VIO_font_width;
new->VIO_font_height = VIO_font_height;
}
/* Get the default font and set the new window with it */
if((fontsize=get_string_var(DEFAULT_FONT_VAR))!=NULL)
{
width=new_malloc(10);
strcpy(width, fontsize);
t=0;
while(width[t]!='x' && t<9)
t++;
height=&width[t+1];
width[t]=0;
VIO_font_width=atoi(width);
VIO_font_height=atoi(height);
new_free(&width);
if (VIO_font_width < 6 || VIO_font_height < 8)
{
VIO_font_width=6;VIO_font_height=10;
}
}
else
{
VIO_font_width=6;VIO_font_height=10;
}
new->VIO_font_width = VIO_font_width;
new->VIO_font_height = VIO_font_height;
/* Get the default menu and add it to the new window */
defmenu=get_string_var(DEFAULT_MENU_VAR);
if(defmenu && *defmenu)
{
if((menutoadd = (MenuStruct *)findmenu(defmenu))==NULL)
say("Menu not found.");
else if(menutoadd->menuorigin==NULL)
say("Cannot create blank menu.");
else
{
new->hwndMenu=newsubmenu((MenuStruct *)menutoadd, new->hwndFrame, TRUE);
new->menu=m_strdup(defmenu);
}
}
else
new->hwndMenu=(HWND)NULL;
cx = new->co * new->VIO_font_width;
cy = new->li * new->VIO_font_height;
new->nicklist = get_int_var(NICKLIST_VAR);
cx += new->nicklist * new->VIO_font_width;
if(new->nicklist)
cx += cxvs;
hdc = WinOpenWindowDC(new->hwndLeft);
/* VIO_staticx and VIO_staticy */
VioCreatePS(&new->hvps, VIO_staticy, VIO_staticx, 0, 1, 0);
VioAssociate(hdc, new->hvps);
hdc = WinOpenWindowDC(new->hwndRight);
VioCreatePS(&new->hvpsnick, VIO_staticy, VIO_staticx, 0, 1, 0);
VioAssociate(hdc, new->hvpsnick);
cursor_off(new->hvpsnick);
VioSetDeviceCellSize(new->VIO_font_height, new->VIO_font_width, new->hvps);
VioSetDeviceCellSize(new->VIO_font_height, new->VIO_font_width, new->hvpsnick);
windata->hvps = new->hvps;
windata->screen = new;
WinSendMsg(new->hwndscroll, SBM_SETSCROLLBAR, (MPARAM)get_int_var(SCROLLBACK_VAR), MPFROM2SHORT(0, get_int_var(SCROLLBACK_VAR)));
WinSetWindowPtr(new->hwndClient, QWP_USER, windata);
WinSetWindowPtr(new->hwndLeft, QWP_USER, windata);
WinSetWindowPtr(new->hwndRight, QWP_USER, windata);
WinSubclassWindow(new->hwndLeft, FrameWndProc);
WinSubclassWindow(new->hwndRight, FrameWndProc);
WinSetWindowPos(new->hwndFrame, HWND_TOP, 0, 0, 0 ,0, SWP_HIDE);
WinSendMsg(new->hwndnickscroll, SBM_SETSCROLLBAR, (MPARAM)0, MPFROM2SHORT(0, new->li));
WinSendMsg(new->hwndnickscroll, SBM_SETTHUMBSIZE, MPFROM2SHORT(new->li, 0), (MPARAM)NULL);
if(get_int_var(MDI_VAR))
{
SWP swp;
WinQueryWindowPos(MDIClient, &swp);
containerh = swp.cy;
WinSetParent(new->hwndFrame, MDIClient, FALSE);
}
else
{
containerh = WinQuerySysValue(HWND_DESKTOP, SV_CYSCREEN);
WinSetParent(new->hwndFrame, HWND_DESKTOP, FALSE);
}
if(new->hwndMenu==(HWND)NULL)
WinSetWindowPos(new->hwndFrame, HWND_TOP, 32 * new->screennum, containerh - ((32 * new->screennum) + cy + (cysb*2)+ cytb), cx+(cxsb*2) + cxvs, cy + (cysb*2)+ WinQuerySysValue(HWND_DESKTOP, SV_CYTITLEBAR), SWP_SIZE | SWP_ZORDER | SWP_ACTIVATE | SWP_SHOW | SWP_MOVE);
else
WinSetWindowPos(new->hwndFrame, HWND_TOP, 32 * new->screennum, containerh - ((32 * new->screennum) + cy + (cysb*2)+ cytb), cx+(cxsb*2) + cxvs, cy + (cysb*2)+ WinQuerySysValue(HWND_DESKTOP, SV_CYTITLEBAR) + /*menupos.cy*/ WinQuerySysValue(HWND_DESKTOP, SV_CYMENU) + 1, SWP_SIZE | SWP_ZORDER | SWP_ACTIVATE | SWP_SHOW | SWP_MOVE);
if((codepage = get_int_var(DEFAULT_CODEPAGE_VAR)))
{
VioSetCp(0, codepage, new->hvps);
VioSetCp(0, codepage, new->hvpsnick);
WinSetCp(hmq, codepage);
WinSetCp(mainhmq, codepage);
}
}
void gui_kill_window(Screen *killscreen)
{
PMYWINDATA wd = (PMYWINDATA)WinQueryWindowPtr(killscreen->hwndClient, QWP_USER);
if(pmthread == *_threadid)
{
if(killscreen->hwndMenu && WinIsWindow(hab, killscreen->hwndMenu))
detach_shared(killscreen);
VioAssociate((HDC)NULL, killscreen->hvps);
VioDestroyPS(killscreen->hvps);
killscreen->hvps = 0;
VioAssociate((HDC)NULL, killscreen->hvpsnick);
VioDestroyPS(killscreen->hvpsnick);
killscreen->hvpsnick = 0;
WinDestroyWindow(killscreen->hwndFrame);
} else {
WinSendMsg(killscreen->hwndFrame, WM_USER+4, (MPARAM)killscreen, NULL);
return;
}
if(wd)
new_free(&wd);
}
void gui_msgbox(void)
{
_beginthread((void *)msgbox, NULL, 0xFFFF, NULL);
}
void gui_popupmenu(char *menuname)
{
if (contextmenu && WinIsWindow(hab, contextmenu))
WinDestroyWindow(contextmenu);
contextmenu=(HWND)menucreatestub(menuname, last_input_screen->hwndFrame, FALSE);
WinPopupMenu(last_input_screen->hwndFrame, last_input_screen->hwndFrame, contextmenu, contextx, contexty, 0, PU_KEYBOARD | PU_MOUSEBUTTON1 | PU_VCONSTRAIN | PU_HCONSTRAIN);
}
/* These are support routines for gui_file_dialog() */
MRESULT EXPENTRY FileFilterProc(HWND hwnd, ULONG message, MPARAM mp1, MPARAM mp2 )
{
return WinDefFileDlgProc( hwnd, message, mp1, mp2 ) ;
}
/* Ripped from functions.c because I couldn't get it to link from there */
BUILT_IN_FUNCTION(fencode)
{
char *result;
int i = 0;
result = (char *)new_malloc(strlen((char *)input) * 2 + 1);
while (*input)
{
result[i++] = (*input >> 4) + 0x41;
result[i++] = (*input & 0x0f) + 0x41;
input++;
}
result[i] = '\0';
return result; /* DONT USE RETURN_STR HERE! */
}
void pm_file_dialog(char *data[7])
{
/* 0 type
1 path
2 title
3 ok
4 apply
5 szButton
6 code
*/
HAB hfdab;
HMQ hfdmq;
FILEDLG fild;
char *okbut, *title, *tmp, *tmp2;
int z;
HWND hwndFile;
hfdab = WinInitialize(0);
hfdmq = WinCreateMsgQueue(hfdab, 0);
convert_dos(data[1]);
okbut = m_strdup(data[5]);
title = m_strdup(data[2]);
fild.cbSize = sizeof(FILEDLG);
fild.fl = /*FDS_HELPBUTTON |*/ FDS_CENTER | FDS_OPEN_DIALOG;
fild.pszTitle = title;
fild.pszOKButton = okbut;
fild.ulUser = 0L;
fild.pfnDlgProc = (PFNWP)FileFilterProc;
fild.lReturn = 0L;
fild.lSRC = 0L;
fild.hMod = 0;
fild.x = 0;
fild.y = 0;
fild.pszIType = (PSZ)NULL;
fild.papszITypeList = (PAPSZ)NULL;
fild.pszIDrive = (PSZ)NULL;
fild.papszIDriveList= (PAPSZ)NULL;
fild.sEAType = (SHORT)0;
fild.papszFQFilename= (PAPSZ)NULL;
fild.ulFQFCount = 0L;
strcpy(fild.szFullFile, data[1]);
tmp = m_strdup(data[6]);
for(z=0;z<7;z++)
{
if(data[z])
new_free(&data[z]);
}
hwndFile = WinFileDlg(HWND_DESKTOP, HWND_DESKTOP, &fild);
if(hwndFile)
{
switch(fild.lReturn)
{
case DID_OK:
paramptr = m_strdup("OK ");
convert_unix(fild.szFullFile);
tmp2 = fencode(NULL, fild.szFullFile);
malloc_strcat(&paramptr, tmp2);
new_free(&tmp2);
break;
case DID_CANCEL:
paramptr = m_strdup("CANCEL");
break;
default:
paramptr = m_strdup(empty_string);
break;
}
new_free(&title);
new_free(&okbut);
codeptr = tmp;
sendevent(EVFILE, current_window->refnum);
}
WinDestroyMsgQueue(hfdmq);
WinTerminate(hfdab);
}
void gui_file_dialog(char *type, char *path, char *title, char *ok, char *apply, char *code, char *szButton)
{
char *data[7];
if(!type)
data[0] = m_strdup(empty_string);
else
data[0] = m_strdup(type);
if(!path)
data[1] = m_strdup(empty_string);
else
data[1] = m_strdup(path);
if(!title)
data[2] = m_strdup(empty_string);
else
data[2] = m_strdup(title);
if(!ok)
data[3] = m_strdup(empty_string);
else
data[3] = m_strdup(ok);
if(!apply)
data[4] = m_strdup(empty_string);
else
data[4] = m_strdup(apply);
if(!szButton)
data[5] = m_strdup(empty_string);
else
data[5] = m_strdup(szButton);
if(!code)
data[6] = m_strdup(empty_string);
else
data[6] = m_strdup(code);
_beginthread((void *)pm_file_dialog, NULL, 0xFFFF, data);
}
void gui_properties_notebook(void)
{
_beginthread((void *)properties_notebook, NULL, 0xFFFF, NULL);
}
#define current_screen last_input_screen
#define INPUT_BUFFER current_screen->input_buffer
#define ADD_TO_INPUT(x) strmcat(INPUT_BUFFER, (x), INPUT_BUFFER_SIZE);
void gui_paste(char *args)
{
ULONG fmtInfo;
APIRET rc;
PSZ pszClipText;
char *oclip, *clip, *bit;
int line = 0, i = 0;
char *channel = NULL;
int topic = 0;
int smartpaste = 0;
char smart[512];
int smartsize = 80;
int input_line = 0;
from_server = current_window->server;
/* Parse arguments */
if (!args || !*args)
channel = get_current_channel_by_refnum(0);
else
{
char *t;
while (args && *args)
{
t = next_arg(args, &args);
if (*t == '-')
{
if (!my_strnicmp(t, "-topic", strlen(t)))
{
topic = 1;
}
else if (!my_strnicmp(t, "-smart", strlen(t)))
{
/* Smartpaste */
smartpaste = 1;
}
else if (!my_strnicmp(t, "-input", strlen(t)))
{
/* Smartpaste */
input_line = 1;
}
}
else
channel = t;
}
}
if (!channel)
channel = get_current_channel_by_refnum(0);
WinOpenClipbrd(hab);
rc = WinQueryClipbrdFmtInfo(hab,
CF_TEXT,
&fmtInfo);
if (rc) /* Text data in clipboard */
{
pszClipText = (PSZ)WinQueryClipbrdData(hab, CF_TEXT); /* Query data handle */
oclip = clip = malloc(strlen(pszClipText) + 1); line = 0;
while ((*clip++ = *pszClipText++)); /* Copy to own memory */
if (!smartpaste)
{
/* Ordinary paste */
clip = oclip; bit = strtok(clip, "\n\r");
while (bit)
{
if (input_line)
{
ADD_TO_INPUT(bit);
update_input(UPDATE_FROM_CURSOR);
} else
if (!topic)
{
if(current_window->query_nick)
{
if (do_hook(PASTE_LIST, "%s %s", current_window->query_nick, bit))
send_text(current_window->query_nick, bit, 0);
}
else
{
if (do_hook(PASTE_LIST, "%s %s", channel, bit))
send_text(channel, bit, 0);
}
} else
{
send_to_server("TOPIC %s :%s", channel, bit);
break;
}
line++;
bit = strtok(NULL, "\n\r");
if (input_line && bit)
send_line(0, NULL);
}
} else
{
/* Rosmo's Incredibly Dull SmartPaste:
Fits as much as possible into a 80-nick_length buffer, stripping
spaces from beginning and end and then pasting */
if (!topic)
smartsize = 512;
else
smartsize = 128; /* 'tis correct? */
clip = oclip;
while (*clip && *clip == ' ') clip++; /* Strip spaces from the start */
*smart = '\0';
while (*clip)
{
if (input_line && *smart)
send_line(0, NULL);
*smart = '\0';
i = 0;
while (*clip && i < smartsize)
{
if (*clip != '\n')
{
if (*clip != '\r') strncat(smart, clip, 1);
}
else
{
strcat(smart, " "); clip++; i++;
while (*clip && *clip == ' ') clip++; /* Strip spaces */
clip--;
}
clip++; i++;
}
if (strcmp(smart, "") != 0) /* If our smart buffer has stuff, send it! */
{
if (input_line)
{
ADD_TO_INPUT(smart);
update_input(UPDATE_FROM_CURSOR);
} else
if (!topic)
{
if(current_window->query_nick)
{
if (do_hook(PASTE_LIST, "%s %s", current_window->query_nick, smart))
send_text(current_window->query_nick, smart, 0);
}
else
{
if (do_hook(PASTE_LIST, "%s %s", channel, smart))
send_text(channel, smart, 0);
}
}
else
{
send_to_server("TOPIC %s :%s", channel, smart);
break;
}
}
}
}
free(oclip); /* Free */
}
WinCloseClipbrd(hab);
}
void gui_setfocus(Screen *screen)
{
WinSetFocus(HWND_DESKTOP, screen->hwndClient);
}
void gui_scrollerchanged(Screen *screen, int position)
{
WinSendMsg(screen->hwndscroll, SBM_SETSCROLLBAR, (MPARAM)position, MPFROM2SHORT(0, get_int_var(SCROLLBACK_VAR)));
}
void gui_query_window_info(Screen *screen, char *fontinfo, int *x, int *y, int *cx, int *cy)
{
SWP wpos;
if(screen)
{
WinQueryWindowPos(screen->hwndFrame, &wpos);
*x = wpos.x;
*y = wpos.y;
*cx = wpos.cx;
*cy = wpos.cy;
}
else
{
*x=*y=*cx=*cy=0;
}
sprintf(fontinfo, "%dx%d", screen ? screen->VIO_font_width : 0, screen ? screen->VIO_font_height : 0);
}
void play_sound(char *filename)
{
#ifdef SOUND
struct stat tmpstat;
HAB soundhab = 0;
HMQ soundhmq = 0;
soundhab = WinInitialize(0);
soundhmq = WinCreateMsgQueue(soundhab, 0);
convert_dos(filename);
if((stat(filename,&tmpstat))==0)
DLL_mciPlayFile((HWND)NULL, filename, 0, 0, 0);
free(filename);
WinDestroyMsgQueue(soundhmq);
WinTerminate(soundhab);
#endif
}
void gui_play_sound(char *filename)
{
#ifdef SOUND
char *freeme = strdup(filename);
if(!DLL_mciPlayFile)
return;
_beginthread((void *)play_sound, NULL, 0xFFFF, (char *)freeme);
#endif
}
int gui_send_mci_string(char *mcistring, char *retstring)
{
#ifdef SOUND
if(DLL_mciSendString)
return DLL_mciSendString((PSZ)mcistring, (PSZ)retstring, 500, 0, 0);
else
#endif
return 0;
}
void gui_get_sound_error(int errnum, char *errstring)
{
#ifdef SOUND
if(DLL_mciGetErrorString)
DLL_mciGetErrorString(errnum, (PSZ)errstring, 500);
#endif
}
void gui_menu(Screen *screen, char *addmenu)
{
/* Finish creating the menu in the Window thread */
WinSendMsg(screen->hwndClient, WM_USER+6, (MPARAM)screen, (MPARAM)addmenu);
}
int gui_isset(Screen *screen, fd_set *rd, int what)
{
if (screen->aviokbdbuffer[0] != 0)
return TRUE;
else
return FALSE;
}
int gui_putc(int c)
{
aputc(c);
return 1;
}
void gui_exit(void)
{
#ifdef SOUND
DosFreeModule(hmod);
#endif
avio_exit();
}
void gui_screen(Screen *new)
{
new->hvps = hvps;
new->hvpsnick = hvpsnick;
new->VIO_font_width = VIO_font_width;
new->VIO_font_height = VIO_font_height;
new->hwndFrame = hwndFrame;
new->hwndClient = hwndClient;
new->hwndLeft = hwndLeft;
new->hwndRight = hwndRight;
new->hwndscroll = hwndscroll;
new->hwndnickscroll = hwndnickscroll;
new->menu=(HWND)NULL;
new->old_li=new->li;
new->old_co=new->co;
new->nicklist = get_int_var(NICKLIST_VAR);
main_screen = new;
}
void gui_resize(Screen *new)
{
pm_resize(new);
}
int gui_screen_width(void)
{
return WinQuerySysValue(HWND_DESKTOP,SV_CXSCREEN);
}
int gui_screen_height(void)
{
return WinQuerySysValue(HWND_DESKTOP,SV_CYSCREEN);
}
void gui_setwindowpos(Screen *screen, int x, int y, int cx, int cy, int top, int bottom, int min, int max, int restore, int activate, int size, int position)
{
ULONG flags = 0;
HWND pos = HWND_BOTTOM;
if(top || bottom)
flags |= SWP_ZORDER;
if(top)
pos = HWND_TOP;
if(min)
flags |= SWP_MINIMIZE;
if(max)
flags |= SWP_MAXIMIZE;
if(restore)
flags |= SWP_RESTORE;
if(activate)
flags |= SWP_ACTIVATE;
if(size)
flags |= SWP_SIZE;
if(position)
flags |= SWP_MOVE;
WinSetWindowPos(screen->hwndFrame, pos, x, y, cx, cy, flags);
}
void BX_gui_mutex_lock(void)
{
}
void BX_gui_mutex_unlock(void)
{
}
int gui_setmenuitem(char *menuname, int refnum, char *what, char *param)
{
MenuRef *tmp = NULL;
MenuStruct *thismenu = findmenu(menuname);
if(thismenu)
tmp = find_menuref(thismenu->root, refnum);
if(!tmp)
return FALSE;
if(my_stricmp(what, "check")==0)
{
if(my_atol(param))
WinSendMsg(tmp->menuhandle, MM_SETITEMATTR, MPFROM2SHORT(tmp->menuid, TRUE), MPFROM2SHORT(MIA_CHECKED, MIA_CHECKED));
else
WinSendMsg(tmp->menuhandle, MM_SETITEMATTR, MPFROM2SHORT(tmp->menuid, TRUE), MPFROM2SHORT(MIA_CHECKED, 0));
}
else if(my_stricmp(what, "text")==0)
{
WinSendMsg(tmp->menuhandle, MM_SETITEMTEXT, MPFROMSHORT(tmp->menuid), MPFROMP(param));
}
else
return FALSE;
return TRUE;
}
void gui_remove_menurefs(char *menu)
{
MenuStruct *cleanmenu = findmenu(menu);
if(cleanmenu)
{
MenuList *tmplist = cleanmenu->menuorigin;
while(tmplist)
{
if(tmplist->refnum > 0)
remove_menuref(&cleanmenu->root, tmplist->refnum);
if(tmplist->menutype == GUISUBMENU || tmplist->menutype == GUIBRKSUBMENU)
gui_remove_menurefs(tmplist->submenu);
tmplist = tmplist->next;
}
}
}
void gui_mdi(Window *window, char *text, int value)
{
WinSendMsg(main_screen->hwndClient, WM_USER+3, (MPARAM)value, 0);
}
void gui_update_nicklist(char *channel)
{
if(channel)
{
Window *this_window;
ChannelList *cptr = lookup_channel(channel, from_server, 0);
if(cptr)
{
this_window = get_window_by_refnum(cptr->refnum);
if(this_window && this_window->screen)
drawnicklist(this_window->screen);
}
}
else
{
Screen *tmp = screen_list;
while(tmp)
{
if(tmp->alive)
drawnicklist(tmp);
tmp = tmp->next;
}
}
}
void gui_nicklist_width(int width, Screen *this_screen)
{
SWP swp;
int ocx = this_screen->VIO_font_width * this_screen->nicklist;
int ncx = this_screen->VIO_font_width * width;
if(ocx)
ocx += cxvs;
if(width)
ncx += cxvs;
if(this_screen->nicklist && !width)
{
WinSetParent(this_screen->hwndRight, HWND_OBJECT, FALSE);
WinSetParent(this_screen->hwndnickscroll, HWND_OBJECT, FALSE);
}
if(!this_screen->nicklist && width)
{
WinSetParent(this_screen->hwndRight, this_screen->hwndClient, FALSE);
WinSetParent(this_screen->hwndnickscroll, this_screen->hwndClient, FALSE);
}
this_screen->nicklist = width;
WinQueryWindowPos(this_screen->hwndFrame, &swp);
WinSetWindowPos(this_screen->hwndFrame, HWND_TOP, swp.x, swp.y, swp.cx + (ncx - ocx), swp.cy, SWP_SIZE);
}
void gui_startup(int argc, char *argv[])
{
mainhab = WinInitialize(0);
mainhmq = WinCreateMsgQueue(mainhab, 0);
pipe(guiipc);
new_open(guiipc[0]);
dw_init(FALSE, argc, argv);
}
void gui_about_box(char *about_text)
{
WinSendMsg(main_screen->hwndFrame, WM_USER+5, MPFROMP(about_text), NULL);
}
void gui_activity(int color)
{
HWND hwnd;
ULONG ulColor;
if(target_window && target_window->screen)
hwnd = target_window->screen->hwndFrame;
else
return;
switch(color)
{
case COLOR_ACTIVE:
ulColor = CLR_RED;
break;
case COLOR_HIGHLIGHT:
ulColor = CLR_BLUE;
break;
default:
ulColor = CLR_PALEGRAY;
break;
}
#if 0
WinSetPresParam(hwnd,
PP_FOREGROUNDCOLORINDEX,
sizeof(ulColor),
&ulColor);
#endif
}
void gui_setfileinfo(char *filename, char *nick, int server)
{
const unsigned fea2listsize = 6000;
char *pData, buffer[200], *s, *t, *fullname, *tmp = NULL;
EAOP2 eaop2;
PFEA2 pFEA2;
extern char *time_format;
APIRET rc;
malloc_sprintf(&tmp, "%s/%s", get_string_var(DCC_DLDIR_VAR), filename);
fullname = expand_twiddle(tmp);
convert_dos(fullname);
new_free(&tmp);
s = get_server_network(server);
time_format = "%c";
update_clock(RESET_TIME);
t = update_clock(GET_TIME);
sprintf(buffer, "%s@%s %s", nick, s ? s : "IRC", t ? t : "clock problem");
time_format = NULL;
update_clock(RESET_TIME);
eaop2.fpGEA2List = 0;
eaop2.fpFEA2List = (PFEA2LIST)malloc(fea2listsize);
pFEA2 = &eaop2.fpFEA2List->list[0];
pFEA2->fEA = 0;
/* .COMMENTS is 9 characters long */
pFEA2->cbName = 9;
/* space for the type and length field. */
pFEA2->cbValue = strlen(buffer)+2*sizeof(USHORT);
strcpy(pFEA2->szName, ".COMMENTS");
pData = pFEA2->szName+pFEA2->cbName+1;
/* data begins at first byte after the name */
*(USHORT*)pData = EAT_ASCII; /* type */
*((USHORT*)pData+1) = strlen(buffer); /* length */
strcpy(pData+2*sizeof(USHORT), buffer);/* content */
pFEA2->oNextEntryOffset = 0;
eaop2.fpFEA2List->cbList = ((PCHAR)pData+2*sizeof(USHORT)+
pFEA2->cbValue)-((PCHAR)eaop2.fpFEA2List);
rc = DosSetPathInfo(fullname,
FIL_QUERYEASIZE,
&eaop2,
sizeof(eaop2),
0);
free((void *)eaop2.fpFEA2List);
}
void gui_setfd(fd_set *rd)
{
/* Set the GUI IPC pipe readable for select() */
FD_SET(guiipc[0], rd);
}
Reference in New Issue View Git Blame Copy Permalink