WOL network tool in C mit VS-C-Cplusplus08 (wake on lan - magic packet) (remote Rechner starten)

//========================================================================= 

// 

// File    : WOL - Wake on lan Ver.0.04 

// 

// Author  : Lowbyte 

//                            

// Create  : 03.12.2009, 08:27,  Lon************ 

// 

// Last Up : 13.12.2009, 22:47,  Lon************* 

// 

// Prog.L  : C 

// 

// Project : 0026N 

// 

// Thx     : Jonny ,Felix ,Michaela 

//========================================================================= 

#include <stdio.h> 

#include <stdlib.h> 

#include <string.h> 

#include <time.h> 

#include <winsock2.h> 

#include <windows.h> 

#include "console.h" 

#define PRINT_TITLE	system("title Network tools -  by LB"); 

#define I_TIME	40 

#define DEMO_INTERRUPT_TIME		_sleep(I_TIME); 

#define DEMO_ROUNDS	0 

void InitWsa(void); 

int initDemo(void); 

int setColor(int color); 

int check_input(char *str); 

int rem_delim(char *mac_str); 

unsigned char memory_reduction(unsigned char a_ptr ,unsigned char b_ptr); 

unsigned char convchartohex(unsigned char c); 

char *OUTPUT[]={"\n----------------------------------------------------------------------------------\n" 

				"\n Wake on Lan - Network - tool						by lowbyte       \n" 

				"\n----------------------------------------------------------------------------------\n" }; 

struct sockaddr_in adr_data; 

char wol_mask[]={0xFF,0xFF,0xFF,0xFF,0xFF,0xFF}; 

int main(void) 

{ 

	SOCKET sock; 

	int by ,i ,j ,m ,c; 

	int Len = sizeof(BOOL); 

	int Val; 

	char mac[19]; 

	char tmp_mac[6]; 

	char mac_buffer[96]; 

	char msg[103]; 

	char sbn[17]; 

	system("title WOL - network tools by lowbyte"); 

	setColor(FOREGROUND_GREEN); 

	initDemo(); 

	printf("%s",*OUTPUT); 

	// Check MAC address input ################################# 

	do 

	{ 

		printf("\n\nExample: 00:23:54:91:0a:90 or 00-23-54-91-0a-90 \n"); 

		printf("\nInput Mac Adresse:"); 

		fgets(mac ,19 ,stdin); 

		mac[strlen(mac)-1]='\0'; 

		fflush(stdin); 

	} 

	while( (check_input(mac) != 0) ); 

	printf("\nInput Broadcast IP Adresse:"); 

	fgets(sbn ,17 ,stdin); 

	sbn[strlen(sbn)-1]='\0'; 

	fflush(stdin); 

	// Make WOL Magic Packet ################################### 

	// Remove delim's ######## 

	rem_delim(mac); 

	// Convert 2 byte char to hex 

	for(j=0,m=0;(j<6);j++) { 

		c = memory_reduction(mac[m] ,mac[m+1]); 

		tmp_mac[j]=c; 

		m +=2; 

	} 

        //  16 mal aufeinanderfolgend die mac Adresse des Remote Rechners in den Vector kopieren 

	for(i=0;i<16;i++) { 

		memcpy(&mac_buffer[i*6] ,tmp_mac ,6);   

	} 

        // Kopiere die WOL_MASKE (0xFF,0xFF,0xFF,0xFF,0xFF,0xFF) in den MSG Puffer 

	memcpy(msg ,wol_mask ,6); 

        // Kopiere den mac-Puffer der mac addresen hinter die Maske 

	memcpy(&msg[6] ,&mac_buffer[0] ,96); 

	msg[102]='\0'; 

	// Initialisiere WSA ####################################### 

	InitWsa(); 

	// Socket anfordern 

	if( (sock = socket(AF_INET ,SOCK_DGRAM ,0)) == INVALID_SOCKET ) { 

		printf("Socket error %i", WSAGetLastError()); 

		WSACleanup(); 

		getchar(); 

		return 0; 

	} else { 

		//printf("Winsock ok ...\n"); 

	} 

	// Set Broadcast opt 

	setsockopt(sock, SOL_SOCKET, SO_BROADCAST, (char*)&Val, Len); 

	/* Set (struct SOCKADDR*)adr_data */ 

	memset(&adr_data ,0 ,sizeof(SOCKADDR)); 

	adr_data.sin_family = AF_INET; 

	adr_data.sin_port = htons(9); 

	adr_data.sin_addr.s_addr = inet_addr(sbn); 

	/* Send magic packet */ 

	by = sendto(sock ,&msg[0] ,(int)102 ,0 ,(struct sockaddr *)&adr_data ,sizeof(adr_data)); 

	if ( by == -1) { 

		printf("\nSendto() failed ...Error nr:%i \n",WSAGetLastError()); 

	} else { 

		printf("\nWOL Magic Packet gesendet >>>"); 

		closesocket(sock); 

		WSACleanup(); 

	} 

	getchar(); 

} 

void InitWsa(void) 

{ 

	WSADATA ptr_wsad; 

	if( WSAStartup(MAKEWORD(2,2), &ptr_wsad) != -1) { 

		//printf("\nWinsock initialisiert ...\n"); 

	} else { 

		printf("\nWinsock konnte nicht initialisiert werden ...\n"); 

		getchar(); 

		exit(1); 

	} 

} 

unsigned char memory_reduction(unsigned char a_ptr ,unsigned char b_ptr) 

{ 

	unsigned char a ,b; 

	a = convchartohex(a_ptr); 

	b = convchartohex(b_ptr); 

	return b|a<<4; 

} 

unsigned char convchartohex(unsigned char c) 

{ 

	if(c >= 'a' && c <= 'f'){ 

		return 10 + (c - 'a'); 

	} 

	if(c >= '0' && c <= '9'){ 

		return c - '0'; 

	} 

	return 0; 

} 

int check_input(char *str) 

{ 

	int i ,flag=0; 

	if(strlen(str)!=17) { 

		cls(); 

		printf("\nInccorect input !\n"); 

		return 1; 

	} 

	for(i=0;i<17;i++) { 

		// check delim 

		if( (i==2) || (i==5) || (i==8) || (i==11) || (i==14) ) { 

			if( (*(str+i)==':') || (*(str+i)=='-') ){ 

				; 

			} else { 

				cls(); 

				printf("\nInccorect input !\n"); 

				return 1; 

			} 

		} else { 

			// check alpha 

			if( (*(str+i)>='0' && *(str+i)<='9') || (*(str+i)>='a' && *(str+i)<='f') ){ 

				; 

			} else { 

				cls(); 

				printf("\nInccorect input !\n"); 

				return 1; 

			} 

		} 

	} 

	return 0; 

} 

int rem_delim(char *mac_str) 

{ 

	char tmp_arr[13]; 

	memcpy(&tmp_arr[0] ,mac_str ,2); 

	memcpy(&tmp_arr[2] ,(mac_str+3) ,2); 

	memcpy(&tmp_arr[4] ,(mac_str+6) ,2); 

	memcpy(&tmp_arr[6] ,(mac_str+9) ,2); 

	memcpy(&tmp_arr[8] ,(mac_str+12) ,2); 

	memcpy(&tmp_arr[10] ,(mac_str+15) ,2); 

	memcpy(&mac_str[0] ,&tmp_arr[0] ,12); 

	*(mac_str+12)='\0'; 

	return 0; 

} 

int initDemo(void) 

{ 

	int i,r; 

	char string[100]; 

	char printstring[100]; 

	strcpy_s(string  ,10 ,"[LOWBYTE]"); 

	memset(printstring ,' ' ,15); 

	printstring[15]='\0'; 

	strcat(printstring,string); 

	for(r=0;(r<=DEMO_ROUNDS);r++) { 

		for(i=0;(i<(int)strlen(printstring));i++) { 

			puts("\n\n\n"); 

			printf("%40i\n",rand()); 

			printf("%40i\n",rand()); 

			printf("%40i\n",rand()); 

			printf("%40i\n",rand()); 

			setCursor(9, 30); 

			printf("%.15s\t\n\n", (printstring+i)); 

			printf("%40i\n",rand()); 

			printf("%40i\n",rand()); 

			printf("%40i\n",rand()); 

			printf("%40i\n",rand()); 

			DEMO_INTERRUPT_TIME; 

			cls(); 

		} 

	} 

	cls(); 

	setCursor(9, 30); 

	printf("PRESS [ENTER]"); 

	getchar(); 

	cls(); 

	return 0; 

}