1 /*
2 * Copyright (C) 1998,1999 Uwe Ohse
3 *
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
8 *
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
13 *
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
17 *
18 * As a special exception this source may be used as part of the
19 * SRS project by CORE/Computer Service Langenbach
20 * regardless of the copyright they choose.
21 *
22 * Contact: uwe@ohse.de
23 */
24 #include "uostr.h"
25
26 /* should use ssize_t here, but that's not portable, and requiring
27 * "config.h" and autoconf for every application doesn't seem to
28 * be appropriate.
29 */
30 uostr_t *
uostr_cut(uostr_t * u,long new_len)31 uostr_cut(uostr_t *u,long new_len)
32 {
33 if (!u->data) {
34 if (new_len!=0) return 0;
35 u->len=0;
36 return u;
37 }
38 if (new_len<0) { /* -x: cut by x */
39 new_len=-new_len;
40 if ((size_t)new_len>u->len) u->len=0;
41 else u->len-=new_len;
42 u->data[u->len]='Z'; /* clever idea stolen from djb */
43 return u;
44 }
45 if ((size_t)new_len<=u->len) {
46 u->len=new_len;
47 u->data[u->len]='Z'; /* clever idea stolen from djb */
48 return u;
49 }
50 return 0;
51 }
52