Function remove_resource

src/utilities/drop.cpp:186–234

#ifndef HAVE_MMAP
static void remove_resource(const TEXT* filename, SLONG shm_length, const TEXT* label)
{
/**************************************
 *
 *	r e m o v e _ r e s o u r c e		( n o n - m m a p )
 *
 **************************************
 *
 * Functional description
 *
 **************************************/
	ISC_STATUS_ARRAY status_vector;
	SH_MEM_T shmem_data;
	TEXT expanded_filename[MAXPATHLEN];

	gds__prefix_lock(expanded_filename, filename);

	if (!ISC_map_file
#ifdef HP11
		(status_vector, expanded_filename,
		(void (*) (void*, sh_mem*, bool)) dummy_init, 0, shm_length, &shmem_data))
#else
		(status_vector, expanded_filename, dummy_init, 0, shm_length, &shmem_data))
#endif
	{
		printf("\n***Unable to access %s resources:\n", label);
		gds__print_status(status_vector);
		return;
	}

	const SLONG key = get_key(expanded_filename);
	if (key == -1)
	{
		printf("\n***Unable to get the key value of the %s file.\n", label);
		return;
	}

	SLONG shmid = shm_exclusive(key, shmem_data.sh_mem_length_mapped);
	if (shmid == -1)
	{
		printf("\n***File for %s is currently in use.\n", label);
		return;
	}

	if (shmctl(shmid, IPC_RMID, 0) == -1)
		printf("\n***Error trying to drop %s file.  ERRNO = %d.\n", label, errno);
	else
		printf("Successfully removed %s file.\n", label);
}
#endif