dthelp: remove obsolete and non-compiled code

This commit is contained in:
Chase
2022-07-29 11:13:34 -05:00
committed by Jon Trulson
parent 1e7374e2f9
commit 4370a95a84
102 changed files with 2 additions and 6076 deletions

View File

@@ -1,38 +0,0 @@
/*
* CDE - Common Desktop Environment
*
* Copyright (c) 1993-2012, The Open Group. All rights reserved.
*
* These libraries and programs are free software; you can
* redistribute them and/or modify them under the terms of the GNU
* Lesser General Public License as published by the Free Software
* Foundation; either version 2 of the License, or (at your option)
* any later version.
*
* These libraries and programs are distributed in the hope that
* they will be useful, but WITHOUT ANY WARRANTY; without even the
* implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU Lesser General Public License for more
* details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with these libraries and programs; if not, write
* to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
* Floor, Boston, MA 02110-1301 USA
*/
/* $XConsortium: emptyfil.c /main/3 1995/11/08 10:30:15 rswiston $ */
/* Copyright (c) 1988, 1989 Hewlett-Packard Co. */
/* Creates a file with nothing in it */
#include <stdio.h>
#include "basic.h"
int main(int argc, char **argv)
{
if (argc != 2) {
fprintf(stderr, "Usage: emptyfil filename\n") ;
exit(1) ;
}
if (! fopen(argv[1], "w"))
fprintf(stderr, "Unable to open %s\n", argv[1]) ;
return 0;
}

View File

@@ -1,160 +0,0 @@
/*
* CDE - Common Desktop Environment
*
* Copyright (c) 1993-2012, The Open Group. All rights reserved.
*
* These libraries and programs are free software; you can
* redistribute them and/or modify them under the terms of the GNU
* Lesser General Public License as published by the Free Software
* Foundation; either version 2 of the License, or (at your option)
* any later version.
*
* These libraries and programs are distributed in the hope that
* they will be useful, but WITHOUT ANY WARRANTY; without even the
* implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU Lesser General Public License for more
* details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with these libraries and programs; if not, write
* to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
* Floor, Boston, MA 02110-1301 USA
*/
/* $XConsortium: fclndir.c /main/3 1995/11/08 10:32:12 rswiston $ */
/* Copyright (c) 1987-1990 Hewlett-Packard Co.
Fclndir.c compares two files, ignoring C line directives that appear
within them as well as blank lines, and leading white space. It exits
with an error code of 0 if the files are the same, 1 if they differ, and
2 if the program was called incorrectly.
*/
/* Feb. 11, 1991, CED: Added v2 fixes to v3 version of fclndir.
Thus, both versions now copy the source file to the target if
the files differ.
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "basic.h"
#define SAME 0
/* different defined to be 0 as of 12-1-89, because fclndir now does
the file-copy if the files are different, or if the second file
doesn't exist. (different used to be 1.) --ced */
#define DIFFERENT 0
#define ERROR 2
struct data {
int c ;
LOGICAL linestart ;
char *p ;
char *q ;
} data1, data2 ;
char linedir[] = "#line" ;
char *p = linedir, *q = linedir + 1 ;
int main(int argc, char **argv);
void copyfile(char *pfile1, char *pfile2);
int nextchar(FILE *file, struct data *data);
int main(int argc, char **argv)
{
FILE *one, *two ;
int c1, c2 ;
if (argc != 3) {
fputs("Usage: fclndir file1 (=source) file2 (=target)\n", stderr) ;
exit(ERROR) ;
}
if (! (one = fopen(argv[1], "r"))) {
fprintf(stderr, "ERROR: source file unavailable: %s\n", argv[1]) ;
exit(ERROR) ;
}
if (! (two = fopen(argv[2], "r"))) {
fprintf(stderr, "No target file %s; copying source file...\n", argv[2]) ;
/* call to copyfile entered by ced, 12-29-89. */
copyfile(argv[1],argv[2]);
exit(DIFFERENT) ;
}
data1.linestart = data2.linestart = TRUE ;
data1.p = data2.p = linedir ;
data1.q = data2.q = linedir + 1 ;
c1 = nextchar(one, &data1) ;
c2 = nextchar(two, &data2) ;
while (c1 != EOF && c2 != EOF) {
if (c1 != c2) {
fprintf(stderr, "%s and %s are different; copying source...\n",
argv[1], argv[2]) ;
/* call to copyfile entered by ced, 12-1-89. */
copyfile(argv[1],argv[2]);
exit(DIFFERENT) ;
}
c1 = nextchar(one, &data1) ;
c2 = nextchar(two, &data2) ;
}
if (c1 != c2) {
fprintf(stderr, "%s and %s are different; copying source...\n",
argv[1], argv[2]) ;
/* call to copyfile entered by ced, 12-1-89. */
copyfile(argv[1],argv[2]);
exit(DIFFERENT) ;
}
fprintf(stderr, "%s and %s are the same\n", argv[1], argv[2]) ;
exit(SAME) ;
}
/* copyfile inserted by ced, 12-1-89. */
void copyfile(char *pfile1, char *pfile2)
{
int ret;
char *pcmd;
int slen;
/* malloc space for the system command: two filenames, plus a command,
spaces, and the terminating null */
slen = strlen(pfile1) + strlen(pfile2) + 8;
pcmd = (char *) malloc(slen);
ret = snprintf(pcmd, slen, "cp %s %s",pfile1,pfile2);
ret = system(pcmd);
ret = snprintf(pcmd, slen, "touch %s",pfile2);
ret = system(pcmd);
free(pcmd);
}
int nextchar(FILE *file, struct data *data)
{
while (data->linestart) {
data->linestart = FALSE ;
for (data->p = linedir ; *data->p; data->p++)
if ((data->c = getc(file)) != (int) *data->p) break ;
/* Found a line directive, skip remainder of line */
if (! *data->p) {
data->c = getc(file) ;
while (data->c != '\n' && data->c != EOF)
data->c = getc(file) ;
data->linestart = TRUE ;
continue ;
}
/* Check for leading blanks */
else if (data->p == linedir) {
while (data->c == ' ' || data->c == '\t') data->c = getc(file) ;
if (data->c == '\n') {
data->linestart = TRUE ;
continue ;
}
return(data->c) ;
}
/* Line began with a prefix of #line */
data->q = linedir ;
}
if (data->q < data->p) return(*data->q++) ;
else if (data->q++ != data->p) data->c = getc(file) ;
if (data->c == '\n') data->linestart = TRUE ;
return(data->c) ;
}

View File

@@ -1,45 +0,0 @@
/*
* CDE - Common Desktop Environment
*
* Copyright (c) 1993-2012, The Open Group. All rights reserved.
*
* These libraries and programs are free software; you can
* redistribute them and/or modify them under the terms of the GNU
* Lesser General Public License as published by the Free Software
* Foundation; either version 2 of the License, or (at your option)
* any later version.
*
* These libraries and programs are distributed in the hope that
* they will be useful, but WITHOUT ANY WARRANTY; without even the
* implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU Lesser General Public License for more
* details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with these libraries and programs; if not, write
* to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
* Floor, Boston, MA 02110-1301 USA
*/
/* $XConsortium: initct.c /main/3 1995/11/08 10:32:53 rswiston $ */
/* Copyright (c) 1987, 1988 Hewlett-Packard Co. */
/* M_initctype initializes the array used to indicate which ASCII
characters can appear within SGML names */
#include "basic.h"
#include "common.h"
extern char m_chartype[M_CHARSETLEN] ;
void m_initctype(void)
{
int i ;
/* ****************************** NOTE: **********************************
If the set of name characters is ever modified, make appropriate changes
in ELTDEF's scanner for testing for valid C identifiers as parameter
names */
for (i = 0 ; i < M_CHARSETLEN ; i++) m_chartype[i] = M_NONNAME ;
for (i = 'A' ; i <= 'Z' ; i++) m_chartype[i] = M_NMSTART ;
for (i = 'a' ; i <= 'z' ; i++) m_chartype[i] = M_NMSTART ;
for (i = '0' ; i <= '9' ; i++) m_chartype[i] = M_DIGIT ;
m_chartype['.'] = m_chartype['-'] = M_NAMECHAR ;
}

View File

@@ -1,40 +0,0 @@
/*
* CDE - Common Desktop Environment
*
* Copyright (c) 1993-2012, The Open Group. All rights reserved.
*
* These libraries and programs are free software; you can
* redistribute them and/or modify them under the terms of the GNU
* Lesser General Public License as published by the Free Software
* Foundation; either version 2 of the License, or (at your option)
* any later version.
*
* These libraries and programs are distributed in the hope that
* they will be useful, but WITHOUT ANY WARRANTY; without even the
* implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU Lesser General Public License for more
* details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with these libraries and programs; if not, write
* to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
* Floor, Boston, MA 02110-1301 USA
*/
/* $XConsortium: strstr.c /main/3 1995/11/08 10:36:55 rswiston $ */
char *strstr ( s1, s2 )
char *s1, *s2 ; {
int x, y ;
y = strlen ( s2 ) ;
x = strlen ( s1 ) - y ;
if ( x < 0 ) return ( ( char * ) 0L ) ;
do {
if ( strncmp ( s1 + x, s2, y ) == 0 ) return ( s1 + x ) ;
}
while ( --x >= 0 ) ;
return ( ( char * ) 0L ) ;
}