Logo Море(!) аналитической информации!
IT-консалтинг Software Engineering Программирование СУБД Безопасность Internet Сети Операционные системы Hardware
Скидка до 20% на услуги дата-центра. Аренда серверной стойки. Colocation от 1U!

Миграция в облако #SotelCloud. Виртуальный сервер в облаке. Выбрать конфигурацию на сайте!

Виртуальная АТС для вашего бизнеса. Приветственные бонусы для новых клиентов!

Виртуальные VPS серверы в РФ и ЕС

Dedicated серверы в РФ и ЕС

По промокоду CITFORUM скидка 30% на заказ VPS\VDS

VPS/VDS серверы. 30 локаций на выбор

Серверы VPS/VDS с большим диском

Хорошие условия для реселлеров

4VPS.SU - VPS в 17-ти странах

2Gbit/s безлимит

Современное железо!

Пример 2

/* Подсчет количества вхождений каждой из букв алфавита в файл.
 * Выдача таблицы.
 * Подсчет частоты использования битов в байтах файла.
 */
#include <stdio.h>
#include <ctype.h>

long bcnt[8];
char masks[8] = {       /* маски битов */
	1, 2, 4, 8, 16, 32, 64, 128 };
long cnt[256];          /* счетчики для каждой из 256 букв */

/* распечатка букв в стиле языка СИ */
char *pr( c ){
	static char buf[ 20 ];

	switch( c ){
	case '\n': return   " \\n "   ;
	case '\r': return   " \\r "   ;
	case '\t': return   " \\t "   ;
	case '\b': return   " \\b "   ;
	case '\f': return   " \\f "   ;
	case '\033': return " ESC"    ;
	case '\0': return   " \\0 "   ;
	case 0177: return   " ^? "    ;
	}
	if( c < ' ' ){
		sprintf( buf, " ^%c ", c + 'A' - 1 );
	}else if( isspace(c)){
		sprintf( buf, " '%c'", c );
	}else if( ! isprint( c ))
		sprintf( buf, "\\%3o", c );
	 else   sprintf( buf, "  %c ", c );
	 return buf;
}

main( argc, argv ) char **argv;  {
	FILE *fp;

	if( argc == 1 ) process( stdin );
	else{   argv++; argc--;
		while( *argv ){
			printf( "----- FILE %s -----\n", *argv );
			if((fp = fopen( *argv, "r" )) == NULL ){
				printf( "Can not open\n" );
			}else{  process( fp ); fclose( fp );   }
			argv++; argc--;
		}
	}
	exit(0);
}

/* обработать файл с поинтером fp */
process( fp ) FILE *fp;
{       register i; int c; int n;

	/* зачистка счетчиков */
	for( i=0; i < 256; i++ ) cnt[i]  = 0L;
	for( i=0; i < 8  ; i++ ) bcnt[i] = 0;

	while( ( c=getc(fp)) != EOF ){
		 c &= 0377;
	     /* подсчитать букву */
		cnt[ c ] ++;
	     /* подсчет битов */
		for( i=0; i < 8; i++ )
			if( c & masks[i] )
				bcnt[ i ] ++;
	}
	/* выдача результатов в COL колонок */
#define COL 4
	printf( "\tASCII map\n" );
	for( n=i=0; i < 256; i++ ){
	     /* if( cnt[i] == 0l ) continue; */
	     printf( "%s  %5ld      |", pr(i), cnt[i] );

	     if( ++n == COL ){ n = 0; putchar('\n'); }
/* или       if((i % COL) == (COL-1)) putchar('\n');       */
	}
	printf( "\n\tBITS map\n" );
	for( i=7; i >=0 ; i-- ) printf( "%6d ", i );
	putchar( '\n' );
	for( i=7; i >=0 ; i-- )
		printf( "%6ld ", bcnt[i] );
	putchar( '\n' ); putchar( '\n' );
}

© Copyright А. Богатырев, 1992-95
Си в UNIX

Назад | Содержание | Вперед

Бесплатный конструктор сайтов и Landing Page

Хостинг с DDoS защитой от 2.5$ + Бесплатный SSL и Домен

SSD VPS в Нидерландах под различные задачи от 2.6$

✅ Дешевый VPS-хостинг на AMD EPYC: 1vCore, 3GB DDR4, 15GB NVMe всего за €3,50!

🔥 Anti-DDoS защита 12 Тбит/с!

VPS в 21 локации

От 104 рублей в месяц

Безлимитный трафик. Защита от ДДоС.

🔥 VPS до 5.7 ГГц под любые задачи с AntiDDoS в 7 локациях

💸 Гифткод CITFORUM (250р на баланс) и попробуйте уже сейчас!

🛒 Скидка 15% на первый платеж (в течение 24ч)

Новости мира IT:

Архив новостей

IT-консалтинг Software Engineering Программирование СУБД Безопасность Internet Сети Операционные системы Hardware

Информация для рекламодателей PR-акции, размещение рекламы — adv@citforum.ru,
тел. +7 495 7861149
Пресс-релизы — pr@citforum.ru
Обратная связь
Информация для авторов
Rambler's Top100 TopList liveinternet.ru: показано число просмотров за 24 часа, посетителей за 24 часа и за сегодня This Web server launched on February 24, 1997
Copyright © 1997-2000 CIT, © 2001-2019 CIT Forum
Внимание! Любой из материалов, опубликованных на этом сервере, не может быть воспроизведен в какой бы то ни было форме и какими бы то ни было средствами без письменного разрешения владельцев авторских прав. Подробнее...