Remove symlink executable and symlink.c

This commit is contained in:
Mark Pictor 2011-08-19 20:46:00 -04:00
parent 2c8cbc34c9
commit 23cf6a5ad5
2 changed files with 0 additions and 68 deletions

View file

@ -50,11 +50,6 @@ SET(FEDEX_SOURCES
fedex.c
)
SET(SYMLINK_SOURCES
fedex.c
symlink.c
)
SET(EXPRESS_PRIVATE_HDRS
conf.h
exptoks.h
@ -73,5 +68,3 @@ add_definitions(
SCL_ADDLIB(express "${EXPRESS_SOURCES}" "")
SCL_ADDEXEC(fedex "${FEDEX_SOURCES}" express)
SCL_ADDEXEC(symlink "${SYMLINK_SOURCES}" express)

View file

@ -1,61 +0,0 @@
/* symlink.c - create symbolic links corresponding to all the schema names */
/* used in an EXPRESS file */
/* Author: Don Libes, NIST, 20-Mar-1993 */
#include <stdlib.h>
#include <sys/param.h>
#include <stdio.h>
#include <errno.h>
#include <unistd.h>
#include "express/express.h"
void
create_links( Express model ) {
DictionaryEntry de;
Schema s;
char linksrc[MAXPATHLEN];
char linkname[MAXPATHLEN];
char dir[MAXPATHLEN];
char dir2[MAXPATHLEN];
extern char * getcwd();
getcwd( dir2, MAXPATHLEN );
/* get rid of "/auto" added by automounter */
/* At NIST, tribble doesn't automount things */
if( 0 == strncmp( "/auto/", dir2, 6 ) ) {
strcpy( dir, dir2 + 5 );
} else {
strcpy( dir, dir2 );
}
sprintf( linksrc, "%s/%s", dir, model->u.express->filename );
DICTdo_init( model->symbol_table, &de );
while( 0 != ( s = DICTdo( &de ) ) ) {
char lower[MAXPATHLEN];
char * dest, *src;
/* convert to schema name lowercase */
dest = lower;
for( src = s->symbol.name; *src; src++ ) {
*dest++ = tolower( *src );
}
*dest = '\0';
sprintf( linkname, "%s.exp", lower );
if( -1 == symlink( linksrc, linkname ) ) {
fprintf( stderr, "symlink(%s,%s) failed: %s\n",
linksrc, linkname, strerror( errno ) );
exit( 1 );
}
}
exit( 0 );
}
void
EXPRESSinit_init() {
EXPRESSbackend = create_links;
}