iio_utils.c 21.3 KB
Newer Older
1 2 3 4 5 6 7 8
/* IIO - useful set of util functionality
 *
 * Copyright (c) 2008 Jonathan Cameron
 *
 * This program is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License version 2 as published by
 * the Free Software Foundation.
 */
9 10
#ifndef _IIO_UTILS_H
#define _IIO_UTILS_H
11

12 13
#include <string.h>
#include <stdlib.h>
14 15
#include <stdio.h>
#include <stdint.h>
16
#include <dirent.h>
17
#include <errno.h>
18 19
#include <ctype.h>
#include "iio_utils.h"
20

21 22
const char *iio_dir = "/sys/bus/iio/devices/";

23 24 25 26 27
static char * const iio_direction[] = {
	"in",
	"out",
};

28 29 30 31
/**
 * iioutils_break_up_name() - extract generic name from full channel name
 * @full_name: the full channel name
 * @generic_name: the output generic channel name
32 33
 *
 * Returns 0 on success, or a negative error code if string extraction failed.
34
 **/
35
int iioutils_break_up_name(const char *full_name,
36 37 38 39
				  char **generic_name)
{
	char *current;
	char *w, *r;
40
	char *working, *prefix = "";
41
	int i, ret;
42 43 44 45 46 47 48

	for (i = 0; i < sizeof(iio_direction) / sizeof(iio_direction[0]); i++)
		if (!strncmp(full_name, iio_direction[i],
			     strlen(iio_direction[i]))) {
			prefix = iio_direction[i];
			break;
		}
49

50
	current = strdup(full_name + strlen(prefix) + 1);
51 52 53
	if (!current)
		return -ENOMEM;

54
	working = strtok(current, "_\0");
55 56 57 58
	if (!working) {
		free(current);
		return -EINVAL;
	}
59

60 61 62
	w = working;
	r = working;

63
	while (*r != '\0') {
64 65 66 67 68 69 70
		if (!isdigit(*r)) {
			*w = *r;
			w++;
		}
		r++;
	}
	*w = '\0';
71
	ret = asprintf(generic_name, "%s_%s", prefix, working);
72 73
	free(current);

74
	return (ret == -1) ? -ENOMEM : 0;
75 76 77 78 79 80
}

/**
 * iioutils_get_type() - find and process _type attribute data
 * @is_signed: output whether channel is signed
 * @bytes: output how many bytes the channel storage occupies
81 82
 * @bits_used: output number of valid bits of data
 * @shift: output amount of bits to shift right data before applying bit mask
83
 * @mask: output a bit mask for the raw data
84 85
 * @be: output if data in big endian
 * @device_dir: the IIO device directory
86 87
 * @name: the channel name
 * @generic_name: the channel type name
88 89
 *
 * Returns a value >= 0 on success, otherwise a negative error code.
90
 **/
91
int iioutils_get_type(unsigned *is_signed,
92 93
			     unsigned *bytes,
			     unsigned *bits_used,
94
			     unsigned *shift,
95
			     uint64_t *mask,
96
			     unsigned *be,
97 98 99 100 101 102 103 104
			     const char *device_dir,
			     const char *name,
			     const char *generic_name)
{
	FILE *sysfsfp;
	int ret;
	DIR *dp;
	char *scan_el_dir, *builtname, *builtname_generic, *filename = 0;
105
	char signchar, endianchar;
106
	unsigned padint;
107 108 109
	const struct dirent *ent;

	ret = asprintf(&scan_el_dir, FORMAT_SCAN_ELEMENTS_DIR, device_dir);
110 111 112
	if (ret < 0)
		return -ENOMEM;

113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128
	ret = asprintf(&builtname, FORMAT_TYPE_FILE, name);
	if (ret < 0) {
		ret = -ENOMEM;
		goto error_free_scan_el_dir;
	}
	ret = asprintf(&builtname_generic, FORMAT_TYPE_FILE, generic_name);
	if (ret < 0) {
		ret = -ENOMEM;
		goto error_free_builtname;
	}

	dp = opendir(scan_el_dir);
	if (dp == NULL) {
		ret = -errno;
		goto error_free_builtname_generic;
	}
129
	ret = -ENOENT;
130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145
	while (ent = readdir(dp), ent != NULL)
		/*
		 * Do we allow devices to override a generic name with
		 * a specific one?
		 */
		if ((strcmp(builtname, ent->d_name) == 0) ||
		    (strcmp(builtname_generic, ent->d_name) == 0)) {
			ret = asprintf(&filename,
				       "%s/%s", scan_el_dir, ent->d_name);
			if (ret < 0) {
				ret = -ENOMEM;
				goto error_closedir;
			}
			sysfsfp = fopen(filename, "r");
			if (sysfsfp == NULL) {
				ret = -errno;
H
Hartmut Knaack 已提交
146
				printf("failed to open %s\n", filename);
147 148
				goto error_free_filename;
			}
149 150 151 152 153 154 155 156

			ret = fscanf(sysfsfp,
				     "%ce:%c%u/%u>>%u",
				     &endianchar,
				     &signchar,
				     bits_used,
				     &padint, shift);
			if (ret < 0) {
157
				ret = -errno;
H
Hartmut Knaack 已提交
158
				printf("failed to pass scan type description\n");
159
				goto error_close_sysfsfp;
160 161 162 163
			} else if (ret != 5) {
				ret = -EIO;
				printf("scan type description didn't match\n");
				goto error_close_sysfsfp;
164
			}
165
			*be = (endianchar == 'b');
166
			*bytes = padint / 8;
167
			if (*bits_used == 64)
168 169 170 171 172 173 174
				*mask = ~0;
			else
				*mask = (1 << *bits_used) - 1;
			if (signchar == 's')
				*is_signed = 1;
			else
				*is_signed = 0;
175 176 177 178 179 180
			if (fclose(sysfsfp)) {
				ret = -errno;
				printf("Failed to close %s\n", filename);
				goto error_free_filename;
			}

181 182 183
			free(filename);

			filename = 0;
184
			sysfsfp = 0;
185
		}
186 187
error_close_sysfsfp:
	if (sysfsfp)
188 189 190
		if (fclose(sysfsfp))
			perror("iioutils_get_type(): Failed to close file");

191 192 193 194
error_free_filename:
	if (filename)
		free(filename);
error_closedir:
195 196 197
	if (closedir(dp) == -1)
		perror("iioutils_get_type(): Failed to close directory");

198 199 200 201 202 203
error_free_builtname_generic:
	free(builtname_generic);
error_free_builtname:
	free(builtname);
error_free_scan_el_dir:
	free(scan_el_dir);
204

205 206 207
	return ret;
}

208 209 210 211 212 213 214 215 216 217
/**
 * iioutils_get_param_float() - read a float value from a channel parameter
 * @output: output the float value
 * @param_name: the parameter name to read
 * @device_dir: the IIO device directory in sysfs
 * @name: the channel name
 * @generic_name: the channel type name
 *
 * Returns a value >= 0 on success, otherwise a negative error code.
 **/
218
int iioutils_get_param_float(float *output,
219 220 221 222 223 224 225 226 227 228 229 230 231
				    const char *param_name,
				    const char *device_dir,
				    const char *name,
				    const char *generic_name)
{
	FILE *sysfsfp;
	int ret;
	DIR *dp;
	char *builtname, *builtname_generic;
	char *filename = NULL;
	const struct dirent *ent;

	ret = asprintf(&builtname, "%s_%s", name, param_name);
232 233 234
	if (ret < 0)
		return -ENOMEM;

235 236 237 238 239 240 241 242 243 244 245
	ret = asprintf(&builtname_generic,
		       "%s_%s", generic_name, param_name);
	if (ret < 0) {
		ret = -ENOMEM;
		goto error_free_builtname;
	}
	dp = opendir(device_dir);
	if (dp == NULL) {
		ret = -errno;
		goto error_free_builtname_generic;
	}
246
	ret = -ENOENT;
247 248 249 250 251 252 253 254 255 256 257 258 259 260
	while (ent = readdir(dp), ent != NULL)
		if ((strcmp(builtname, ent->d_name) == 0) ||
		    (strcmp(builtname_generic, ent->d_name) == 0)) {
			ret = asprintf(&filename,
				       "%s/%s", device_dir, ent->d_name);
			if (ret < 0) {
				ret = -ENOMEM;
				goto error_closedir;
			}
			sysfsfp = fopen(filename, "r");
			if (!sysfsfp) {
				ret = -errno;
				goto error_free_filename;
			}
261 262 263 264
			errno = 0;
			if (fscanf(sysfsfp, "%f", output) != 1)
				ret = errno ? -errno : -ENODATA;

265 266 267 268 269 270
			break;
		}
error_free_filename:
	if (filename)
		free(filename);
error_closedir:
271 272 273
	if (closedir(dp) == -1)
		perror("iioutils_get_param_float(): Failed to close directory");

274 275 276 277
error_free_builtname_generic:
	free(builtname_generic);
error_free_builtname:
	free(builtname);
278

279 280 281
	return ret;
}

282
/**
283 284 285
 * bsort_channel_array_by_index() - sort the array in index order
 * @ci_array: the iio_channel_info array to be sorted
 * @cnt: the amount of array elements
286 287
 **/

288
void bsort_channel_array_by_index(struct iio_channel_info **ci_array,
289 290 291 292 293 294 295 296 297 298 299 300 301 302
					 int cnt)
{

	struct iio_channel_info temp;
	int x, y;

	for (x = 0; x < cnt; x++)
		for (y = 0; y < (cnt - 1); y++)
			if ((*ci_array)[y].index > (*ci_array)[y+1].index) {
				temp = (*ci_array)[y + 1];
				(*ci_array)[y + 1] = (*ci_array)[y];
				(*ci_array)[y] = temp;
			}
}
303 304 305 306

/**
 * build_channel_array() - function to figure out what channels are present
 * @device_dir: the IIO device directory in sysfs
307 308 309 310
 * @ci_array: output the resulting array of iio_channel_info
 * @counter: output the amount of array elements
 *
 * Returns 0 on success, otherwise a negative error code.
311
 **/
312
int build_channel_array(const char *device_dir,
313 314 315 316 317
			      struct iio_channel_info **ci_array,
			      int *counter)
{
	DIR *dp;
	FILE *sysfsfp;
318
	int count, i;
319 320 321 322 323 324 325 326
	struct iio_channel_info *current;
	int ret;
	const struct dirent *ent;
	char *scan_el_dir;
	char *filename;

	*counter = 0;
	ret = asprintf(&scan_el_dir, FORMAT_SCAN_ELEMENTS_DIR, device_dir);
327 328 329
	if (ret < 0)
		return -ENOMEM;

330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349
	dp = opendir(scan_el_dir);
	if (dp == NULL) {
		ret = -errno;
		goto error_free_name;
	}
	while (ent = readdir(dp), ent != NULL)
		if (strcmp(ent->d_name + strlen(ent->d_name) - strlen("_en"),
			   "_en") == 0) {
			ret = asprintf(&filename,
				       "%s/%s", scan_el_dir, ent->d_name);
			if (ret < 0) {
				ret = -ENOMEM;
				goto error_close_dir;
			}
			sysfsfp = fopen(filename, "r");
			if (sysfsfp == NULL) {
				ret = -errno;
				free(filename);
				goto error_close_dir;
			}
350 351 352 353 354 355 356 357 358 359
			errno = 0;
			if (fscanf(sysfsfp, "%i", &ret) != 1) {
				ret = errno ? -errno : -ENODATA;
				if (fclose(sysfsfp))
					perror("build_channel_array(): Failed to close file");

				free(filename);
				goto error_close_dir;
			}

360 361
			if (ret == 1)
				(*counter)++;
362 363 364 365 366 367
			if (fclose(sysfsfp)) {
				ret = -errno;
				free(filename);
				goto error_close_dir;
			}

368 369
			free(filename);
		}
370
	*ci_array = malloc(sizeof(**ci_array) * (*counter));
371 372 373 374 375
	if (*ci_array == NULL) {
		ret = -ENOMEM;
		goto error_close_dir;
	}
	seekdir(dp, 0);
376
	count = 0;
377 378 379
	while (ent = readdir(dp), ent != NULL) {
		if (strcmp(ent->d_name + strlen(ent->d_name) - strlen("_en"),
			   "_en") == 0) {
380
			int current_enabled = 0;
381

382 383 384 385 386 387 388 389 390 391 392 393
			current = &(*ci_array)[count++];
			ret = asprintf(&filename,
				       "%s/%s", scan_el_dir, ent->d_name);
			if (ret < 0) {
				ret = -ENOMEM;
				/* decrement count to avoid freeing name */
				count--;
				goto error_cleanup_array;
			}
			sysfsfp = fopen(filename, "r");
			if (sysfsfp == NULL) {
				ret = -errno;
H
Hartmut Knaack 已提交
394
				free(filename);
395
				count--;
396 397
				goto error_cleanup_array;
			}
398 399 400 401 402 403 404 405 406 407 408 409 410 411
			errno = 0;
			if (fscanf(sysfsfp, "%i", &current_enabled) != 1) {
				ret = errno ? -errno : -ENODATA;
				free(filename);
				count--;
				goto error_cleanup_array;
			}

			if (fclose(sysfsfp)) {
				ret = -errno;
				free(filename);
				count--;
				goto error_cleanup_array;
			}
412

413
			if (!current_enabled) {
414 415 416 417 418
				free(filename);
				count--;
				continue;
			}

419 420 421 422 423 424 425 426
			current->scale = 1.0;
			current->offset = 0;
			current->name = strndup(ent->d_name,
						strlen(ent->d_name) -
						strlen("_en"));
			if (current->name == NULL) {
				free(filename);
				ret = -ENOMEM;
427
				count--;
428 429 430 431 432 433 434
				goto error_cleanup_array;
			}
			/* Get the generic and specific name elements */
			ret = iioutils_break_up_name(current->name,
						     &current->generic_name);
			if (ret) {
				free(filename);
435 436
				free(current->name);
				count--;
437 438 439 440 441 442 443 444 445 446 447 448
				goto error_cleanup_array;
			}
			ret = asprintf(&filename,
				       "%s/%s_index",
				       scan_el_dir,
				       current->name);
			if (ret < 0) {
				free(filename);
				ret = -ENOMEM;
				goto error_cleanup_array;
			}
			sysfsfp = fopen(filename, "r");
449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471
			if (sysfsfp == NULL) {
				ret = -errno;
				printf("failed to open %s\n", filename);
				free(filename);
				goto error_cleanup_array;
			}

			errno = 0;
			if (fscanf(sysfsfp, "%u", &current->index) != 1) {
				ret = errno ? -errno : -ENODATA;
				if (fclose(sysfsfp))
					perror("build_channel_array(): Failed to close file");

				free(filename);
				goto error_cleanup_array;
			}

			if (fclose(sysfsfp)) {
				ret = -errno;
				free(filename);
				goto error_cleanup_array;
			}

472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490
			free(filename);
			/* Find the scale */
			ret = iioutils_get_param_float(&current->scale,
						       "scale",
						       device_dir,
						       current->name,
						       current->generic_name);
			if (ret < 0)
				goto error_cleanup_array;
			ret = iioutils_get_param_float(&current->offset,
						       "offset",
						       device_dir,
						       current->name,
						       current->generic_name);
			if (ret < 0)
				goto error_cleanup_array;
			ret = iioutils_get_type(&current->is_signed,
						&current->bytes,
						&current->bits_used,
491
						&current->shift,
492
						&current->mask,
493
						&current->be,
494 495 496
						device_dir,
						current->name,
						current->generic_name);
497 498
			if (ret < 0)
				goto error_cleanup_array;
499 500
		}
	}
501

502 503 504 505 506
	if (closedir(dp) == -1) {
		ret = -errno;
		goto error_cleanup_array;
	}

507
	free(scan_el_dir);
508 509
	/* reorder so that the array is in index order */
	bsort_channel_array_by_index(ci_array, *counter);
510 511 512 513

	return 0;

error_cleanup_array:
514
	for (i = count - 1;  i >= 0; i--) {
515
		free((*ci_array)[i].name);
516 517
		free((*ci_array)[i].generic_name);
	}
518 519
	free(*ci_array);
error_close_dir:
520 521 522 523
	if (dp)
		if (closedir(dp) == -1)
			perror("build_channel_array(): Failed to close dir");

524 525
error_free_name:
	free(scan_el_dir);
526

527 528 529
	return ret;
}

530 531 532 533 534 535 536 537 538 539 540 541
int calc_digits(int num)
{
	int count = 0;

	while (num != 0) {
		num /= 10;
		count++;
	}

	return count;
}

542 543 544
/**
 * find_type_by_name() - function to match top level types by name
 * @name: top level type instance name
545
 * @type: the type of top level instance being searched
546
 *
547 548
 * Returns the device number of a matched IIO device on success, otherwise a
 * negative error code.
549 550
 * Typical types this is used for are device and trigger.
 **/
551
int find_type_by_name(const char *name, const char *type)
552 553
{
	const struct dirent *ent;
554
	int number, numstrlen, ret;
555 556 557

	FILE *nameFile;
	DIR *dp;
558 559 560
	char thisname[IIO_MAX_NAME_LENGTH];
	char *filename;

561 562
	dp = opendir(iio_dir);
	if (dp == NULL) {
563
		printf("No industrialio devices available\n");
564
		return -ENODEV;
565
	}
566

567 568
	while (ent = readdir(dp), ent != NULL) {
		if (strcmp(ent->d_name, ".") != 0 &&
569 570 571
			strcmp(ent->d_name, "..") != 0 &&
			strlen(ent->d_name) > strlen(type) &&
			strncmp(ent->d_name, type, strlen(type)) == 0) {
572 573 574 575 576 577 578 579 580 581 582 583 584
			errno = 0;
			ret = sscanf(ent->d_name + strlen(type), "%d", &number);
			if (ret < 0) {
				ret = -errno;
				printf("failed to read element number\n");
				goto error_close_dir;
			} else if (ret != 1) {
				ret = -EIO;
				printf("failed to match element number\n");
				goto error_close_dir;
			}

			numstrlen = calc_digits(number);
585 586 587 588 589 590 591
			/* verify the next character is not a colon */
			if (strncmp(ent->d_name + strlen(type) + numstrlen,
					":",
					1) != 0) {
				filename = malloc(strlen(iio_dir)
						+ strlen(type)
						+ numstrlen
592
						+ 6);
593
				if (filename == NULL) {
594 595 596 597 598 599 600 601 602
					ret = -ENOMEM;
					goto error_close_dir;
				}

				ret = sprintf(filename, "%s%s%d/name", iio_dir,
					      type, number);
				if (ret < 0) {
					free(filename);
					goto error_close_dir;
603
				}
604

605
				nameFile = fopen(filename, "r");
606 607
				if (!nameFile) {
					free(filename);
608
					continue;
609
				}
610
				free(filename);
611 612 613 614 615 616 617 618 619 620 621
				errno = 0;
				if (fscanf(nameFile, "%s", thisname) != 1) {
					ret = errno ? -errno : -ENODATA;
					goto error_close_dir;
				}

				if (fclose(nameFile)) {
					ret = -errno;
					goto error_close_dir;
				}

622
				if (strcmp(name, thisname) == 0) {
623 624
					if (closedir(dp) == -1)
						return -errno;
625 626
					return number;
				}
627 628 629
			}
		}
	}
630 631 632
	if (closedir(dp) == -1)
		return -errno;

633
	return -ENODEV;
634 635 636 637 638

error_close_dir:
	if (closedir(dp) == -1)
		perror("find_type_by_name(): Failed to close directory");
	return ret;
639 640
}

641
static int _write_sysfs_int(char *filename, char *basedir, int val, int verify)
642
{
643
	int ret = 0;
644 645 646
	FILE *sysfsfp;
	int test;
	char *temp = malloc(strlen(basedir) + strlen(filename) + 2);
647

648 649
	if (temp == NULL)
		return -ENOMEM;
650 651 652 653
	ret = sprintf(temp, "%s/%s", basedir, filename);
	if (ret < 0)
		goto error_free;

654
	sysfsfp = fopen(temp, "w");
655 656
	if (sysfsfp == NULL) {
		ret = -errno;
H
Hartmut Knaack 已提交
657
		printf("failed to open %s\n", temp);
658 659
		goto error_free;
	}
660 661 662 663 664 665 666 667 668 669 670 671 672
	ret = fprintf(sysfsfp, "%d", val);
	if (ret < 0) {
		if (fclose(sysfsfp))
			perror("_write_sysfs_int(): Failed to close dir");

		goto error_free;
	}

	if (fclose(sysfsfp)) {
		ret = -errno;
		goto error_free;
	}

673 674 675 676
	if (verify) {
		sysfsfp = fopen(temp, "r");
		if (sysfsfp == NULL) {
			ret = -errno;
H
Hartmut Knaack 已提交
677
			printf("failed to open %s\n", temp);
678 679
			goto error_free;
		}
680 681 682 683 684 685 686 687 688 689 690 691 692
		if (fscanf(sysfsfp, "%d", &test) != 1) {
			ret = errno ? -errno : -ENODATA;
			if (fclose(sysfsfp))
				perror("_write_sysfs_int(): Failed to close dir");

			goto error_free;
		}

		if (fclose(sysfsfp)) {
			ret = -errno;
			goto error_free;
		}

693 694 695 696 697 698 699 700 701 702 703 704 705
		if (test != val) {
			printf("Possible failure in int write %d to %s%s\n",
				val,
				basedir,
				filename);
			ret = -1;
		}
	}
error_free:
	free(temp);
	return ret;
}

706 707 708 709 710 711 712 713
/**
 * write_sysfs_int() - write an integer value to a sysfs file
 * @filename: name of the file to write to
 * @basedir: the sysfs directory in which the file is to be found
 * @val: integer value to write to file
 *
 * Returns a value >= 0 on success, otherwise a negative error code.
 **/
714 715 716
int write_sysfs_int(char *filename, char *basedir, int val)
{
	return _write_sysfs_int(filename, basedir, val, 0);
717 718
}

719 720 721 722 723 724 725 726 727
/**
 * write_sysfs_int_and_verify() - write an integer value to a sysfs file
 *				  and verify
 * @filename: name of the file to write to
 * @basedir: the sysfs directory in which the file is to be found
 * @val: integer value to write to file
 *
 * Returns a value >= 0 on success, otherwise a negative error code.
 **/
728
int write_sysfs_int_and_verify(char *filename, char *basedir, int val)
729 730 731 732
{
	return _write_sysfs_int(filename, basedir, val, 1);
}

733 734
static int _write_sysfs_string(char *filename, char *basedir, char *val,
			       int verify)
735
{
736
	int ret = 0;
737
	FILE  *sysfsfp;
738
	char *temp = malloc(strlen(basedir) + strlen(filename) + 2);
739

740 741 742 743
	if (temp == NULL) {
		printf("Memory allocation failed\n");
		return -ENOMEM;
	}
744 745 746 747
	ret = sprintf(temp, "%s/%s", basedir, filename);
	if (ret < 0)
		goto error_free;

748
	sysfsfp = fopen(temp, "w");
749 750
	if (sysfsfp == NULL) {
		ret = -errno;
H
Hartmut Knaack 已提交
751
		printf("Could not open %s\n", temp);
752 753
		goto error_free;
	}
754 755 756 757 758 759 760 761 762 763 764 765 766
	ret = fprintf(sysfsfp, "%s", val);
	if (ret < 0) {
		if (fclose(sysfsfp))
			perror("_write_sysfs_string(): Failed to close dir");

		goto error_free;
	}

	if (fclose(sysfsfp)) {
		ret = -errno;
		goto error_free;
	}

767 768 769 770
	if (verify) {
		sysfsfp = fopen(temp, "r");
		if (sysfsfp == NULL) {
			ret = -errno;
H
Hartmut Knaack 已提交
771
			printf("could not open file to verify\n");
772 773
			goto error_free;
		}
774 775 776 777 778 779 780 781 782 783 784 785 786
		if (fscanf(sysfsfp, "%s", temp) != 1) {
			ret = errno ? -errno : -ENODATA;
			if (fclose(sysfsfp))
				perror("_write_sysfs_string(): Failed to close dir");

			goto error_free;
		}

		if (fclose(sysfsfp)) {
			ret = -errno;
			goto error_free;
		}

787 788 789
		if (strcmp(temp, val) != 0) {
			printf("Possible failure in string write of %s "
				"Should be %s "
L
Lucas De Marchi 已提交
790
				"written to %s\%s\n",
791 792 793 794 795 796
				temp,
				val,
				basedir,
				filename);
			ret = -1;
		}
797
	}
798 799
error_free:
	free(temp);
800

801
	return ret;
802
}
803

804 805 806 807 808
/**
 * write_sysfs_string_and_verify() - string write, readback and verify
 * @filename: name of file to write to
 * @basedir: the sysfs directory in which the file is to be found
 * @val: the string to write
809 810
 *
 * Returns a value >= 0 on success, otherwise a negative error code.
811 812 813
 **/
int write_sysfs_string_and_verify(char *filename, char *basedir, char *val)
{
814 815
	return _write_sysfs_string(filename, basedir, val, 1);
}
816

817 818 819 820 821 822 823 824
/**
 * write_sysfs_string() - write string to a sysfs file
 * @filename: name of file to write to
 * @basedir: the sysfs directory in which the file is to be found
 * @val: the string to write
 *
 * Returns a value >= 0 on success, otherwise a negative error code.
 **/
825 826 827
int write_sysfs_string(char *filename, char *basedir, char *val)
{
	return _write_sysfs_string(filename, basedir, val, 0);
828 829
}

830 831 832 833 834 835 836 837
/**
 * read_sysfs_posint() - read an integer value from file
 * @filename: name of file to read from
 * @basedir: the sysfs directory in which the file is to be found
 *
 * Returns the read integer value >= 0 on success, otherwise a negative error
 * code.
 **/
838 839 840 841
int read_sysfs_posint(char *filename, char *basedir)
{
	int ret;
	FILE  *sysfsfp;
842
	char *temp = malloc(strlen(basedir) + strlen(filename) + 2);
843

844 845 846 847
	if (temp == NULL) {
		printf("Memory allocation failed");
		return -ENOMEM;
	}
848 849 850 851
	ret = sprintf(temp, "%s/%s", basedir, filename);
	if (ret < 0)
		goto error_free;

852
	sysfsfp = fopen(temp, "r");
853 854 855 856
	if (sysfsfp == NULL) {
		ret = -errno;
		goto error_free;
	}
857 858 859 860 861 862 863 864 865 866 867 868
	errno = 0;
	if (fscanf(sysfsfp, "%d\n", &ret) != 1) {
		ret = errno ? -errno : -ENODATA;
		if (fclose(sysfsfp))
			perror("read_sysfs_posint(): Failed to close dir");

		goto error_free;
	}

	if (fclose(sysfsfp))
		ret = -errno;

869 870 871 872 873
error_free:
	free(temp);
	return ret;
}

874 875 876 877 878 879 880 881
/**
 * read_sysfs_float() - read a float value from file
 * @filename: name of file to read from
 * @basedir: the sysfs directory in which the file is to be found
 * @val: output the read float value
 *
 * Returns a value >= 0 on success, otherwise a negative error code.
 **/
882 883
int read_sysfs_float(char *filename, char *basedir, float *val)
{
884
	int ret = 0;
885 886
	FILE  *sysfsfp;
	char *temp = malloc(strlen(basedir) + strlen(filename) + 2);
887

888 889 890 891
	if (temp == NULL) {
		printf("Memory allocation failed");
		return -ENOMEM;
	}
892 893 894 895
	ret = sprintf(temp, "%s/%s", basedir, filename);
	if (ret < 0)
		goto error_free;

896 897 898 899 900
	sysfsfp = fopen(temp, "r");
	if (sysfsfp == NULL) {
		ret = -errno;
		goto error_free;
	}
901 902 903 904 905 906 907 908 909 910 911 912
	errno = 0;
	if (fscanf(sysfsfp, "%f\n", val) != 1) {
		ret = errno ? -errno : -ENODATA;
		if (fclose(sysfsfp))
			perror("read_sysfs_float(): Failed to close dir");

		goto error_free;
	}

	if (fclose(sysfsfp))
		ret = -errno;

913 914
error_free:
	free(temp);
915 916
	return ret;
}
917

918 919 920 921 922 923 924 925
/**
 * read_sysfs_string() - read a string from file
 * @filename: name of file to read from
 * @basedir: the sysfs directory in which the file is to be found
 * @str: output the read string
 *
 * Returns a value >= 0 on success, otherwise a negative error code.
 **/
926
int read_sysfs_string(const char *filename, const char *basedir, char *str)
927
{
928
	int ret = 0;
929 930
	FILE  *sysfsfp;
	char *temp = malloc(strlen(basedir) + strlen(filename) + 2);
931

932 933 934 935
	if (temp == NULL) {
		printf("Memory allocation failed");
		return -ENOMEM;
	}
936 937 938 939
	ret = sprintf(temp, "%s/%s", basedir, filename);
	if (ret < 0)
		goto error_free;

940 941 942 943 944
	sysfsfp = fopen(temp, "r");
	if (sysfsfp == NULL) {
		ret = -errno;
		goto error_free;
	}
945 946 947 948 949 950 951 952 953 954 955 956
	errno = 0;
	if (fscanf(sysfsfp, "%s\n", str) != 1) {
		ret = errno ? -errno : -ENODATA;
		if (fclose(sysfsfp))
			perror("read_sysfs_string(): Failed to close dir");

		goto error_free;
	}

	if (fclose(sysfsfp))
		ret = -errno;

957 958 959 960
error_free:
	free(temp);
	return ret;
}
961 962

#endif /* _IIO_UTILS_H */