view src/protocols/zephyr/ZGetWGPort.c @ 11033:50224ac8184d

[gaim-migrate @ 12919] Ok, this is debug window filtering. Sadrul was going to do this with a text entry, but I like this better, feel free to disagree with me. It's not the prettiest in a couple places, most notable gtkmain.c where a bunch of categories that don't currently have a home get registered. I added some plugin_(un)load functions to some plugins to place the (un)register functions. Though I didn't do that for the prpls. Comments and cleanups welcome. (Oh, I've been seeing some crashes on quit, but I haven't been able to get it to happen reliably so I'm not sure if it's my code or some transient HEAD oscar/other crash.) committer: Tailor Script <[e-mail]>

/* This file is part of the Project Athena Zephyr Notification System.
 * It contains source for the ZGetWGPort function.
 *
 *	Created by:	Robert French
 *
 *	$Source$
 *	$Author: thekingant $
 *
 *	Copyright (c) 1987 by the Massachusetts Institute of Technology.
 *	For copying and distribution information, see the file
 *	"mit-copyright.h". 
 */
/* $Header$ */

#ifndef lint
static char rcsid_ZGetWGPort_c[] = "$Header$";
#endif

#include "internal.h"

int ZGetWGPort()
{
    char *envptr, name[128];
    FILE *fp;
    int wgport;
#ifdef WIN32
    long int buffsize= 128;
    char tempdir[buffsize];
#endif	
    envptr = getenv("WGFILE");
    if (!envptr) {
#ifdef WIN32
         GetTempPath(buffsize,tempdir);
         GetTempFileName(tempdir,"wg.",0,name);
#else
	(void) sprintf(name, "/tmp/wg.%d", getuid());
#endif
	envptr = name;
    } 
    if (!(fp = fopen(envptr, "r")))
	return (-1);

    /* if fscanf fails, return -1 via wgport */
    if (fscanf(fp, "%d", &wgport) != 1)
	    wgport = -1;

    (void) fclose(fp);

    return (wgport);
}