17c478bd9Sstevel@tonic-gate /*
27c478bd9Sstevel@tonic-gate * CDDL HEADER START
37c478bd9Sstevel@tonic-gate *
47c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the
57c478bd9Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only
67c478bd9Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance
77c478bd9Sstevel@tonic-gate * with the License.
87c478bd9Sstevel@tonic-gate *
97c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
107c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
117c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions
127c478bd9Sstevel@tonic-gate * and limitations under the License.
137c478bd9Sstevel@tonic-gate *
147c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
157c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
167c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
177c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
187c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
197c478bd9Sstevel@tonic-gate *
207c478bd9Sstevel@tonic-gate * CDDL HEADER END
217c478bd9Sstevel@tonic-gate */
227c478bd9Sstevel@tonic-gate /*
237c478bd9Sstevel@tonic-gate * Copyright (c) 1995, by Sun Microsystems, Inc.
247c478bd9Sstevel@tonic-gate * All rights reserved.
257c478bd9Sstevel@tonic-gate */
267c478bd9Sstevel@tonic-gate
277c478bd9Sstevel@tonic-gate /*
287c478bd9Sstevel@tonic-gate * ptrmove.c
297c478bd9Sstevel@tonic-gate *
307c478bd9Sstevel@tonic-gate * Copyright 1990, 1995 by Mortice Kern Systems Inc. All rights reserved.
317c478bd9Sstevel@tonic-gate *
327c478bd9Sstevel@tonic-gate */
337c478bd9Sstevel@tonic-gate
347c478bd9Sstevel@tonic-gate #ifdef M_RCSID
357c478bd9Sstevel@tonic-gate #ifndef lint
367c478bd9Sstevel@tonic-gate static char rcsID[] = "$Header: /rd/src/libc/xcurses/rcs/ptrmove.c 1.3 1995/05/18 20:55:05 ant Exp $";
377c478bd9Sstevel@tonic-gate #endif
387c478bd9Sstevel@tonic-gate #endif
397c478bd9Sstevel@tonic-gate
407c478bd9Sstevel@tonic-gate #include <private.h>
417c478bd9Sstevel@tonic-gate
427c478bd9Sstevel@tonic-gate static void reverse(void **, int, int);
437c478bd9Sstevel@tonic-gate
447c478bd9Sstevel@tonic-gate /*
457c478bd9Sstevel@tonic-gate * Move range start..finish inclusive before the given location.
46*1da57d55SToomas Soome * Return -1 if the region to move is out of bounds or the target
477c478bd9Sstevel@tonic-gate * falls within the region; 0 for success.
487c478bd9Sstevel@tonic-gate *
497c478bd9Sstevel@tonic-gate * (See Software Tools chapter 6.)
507c478bd9Sstevel@tonic-gate */
517c478bd9Sstevel@tonic-gate int
__m_ptr_move(array,length,start,finish,to)527c478bd9Sstevel@tonic-gate __m_ptr_move(array, length, start, finish, to)
537c478bd9Sstevel@tonic-gate void **array;
547c478bd9Sstevel@tonic-gate unsigned length, start, finish, to;
557c478bd9Sstevel@tonic-gate {
567c478bd9Sstevel@tonic-gate #ifdef M_CURSES_TRACE
577c478bd9Sstevel@tonic-gate __m_trace(
58*1da57d55SToomas Soome "__m_ptr_move(%p, %d, %d, %d, %d)",
597c478bd9Sstevel@tonic-gate array, length, start, finish, to
607c478bd9Sstevel@tonic-gate );
617c478bd9Sstevel@tonic-gate #endif
627c478bd9Sstevel@tonic-gate if (finish < start || length <= finish)
637c478bd9Sstevel@tonic-gate return __m_return_int("__m_ptr_move()", -1);
647c478bd9Sstevel@tonic-gate
657c478bd9Sstevel@tonic-gate if (to < start) {
667c478bd9Sstevel@tonic-gate reverse(array, to, start-1);
677c478bd9Sstevel@tonic-gate reverse(array, start, finish);
687c478bd9Sstevel@tonic-gate reverse(array, to, finish);
697c478bd9Sstevel@tonic-gate } else if (finish < to && to <= length) {
707c478bd9Sstevel@tonic-gate reverse(array, start, finish);
717c478bd9Sstevel@tonic-gate reverse(array, finish+1, to-1);
727c478bd9Sstevel@tonic-gate reverse(array, start, to-1);
737c478bd9Sstevel@tonic-gate } else {
747c478bd9Sstevel@tonic-gate return __m_return_int("__m_ptr_move()", -1);
757c478bd9Sstevel@tonic-gate }
767c478bd9Sstevel@tonic-gate
777c478bd9Sstevel@tonic-gate return __m_return_int("__m_ptr_move()", 0);
787c478bd9Sstevel@tonic-gate }
797c478bd9Sstevel@tonic-gate
807c478bd9Sstevel@tonic-gate /*
817c478bd9Sstevel@tonic-gate * Reverse range a..b inclusive.
827c478bd9Sstevel@tonic-gate */
837c478bd9Sstevel@tonic-gate static void
reverse(ptr,a,b)847c478bd9Sstevel@tonic-gate reverse(ptr, a, b)
857c478bd9Sstevel@tonic-gate void **ptr;
867c478bd9Sstevel@tonic-gate int a, b;
877c478bd9Sstevel@tonic-gate {
887c478bd9Sstevel@tonic-gate register void *temp;
897c478bd9Sstevel@tonic-gate register void **a_ptr = &ptr[a];
907c478bd9Sstevel@tonic-gate register void **b_ptr = &ptr[b];
917c478bd9Sstevel@tonic-gate
927c478bd9Sstevel@tonic-gate while (a_ptr < b_ptr) {
937c478bd9Sstevel@tonic-gate temp = *a_ptr;
947c478bd9Sstevel@tonic-gate *a_ptr++ = *b_ptr;
957c478bd9Sstevel@tonic-gate *b_ptr-- = temp;
967c478bd9Sstevel@tonic-gate }
977c478bd9Sstevel@tonic-gate }
98