ELOG/elog
0
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Removed old versions

Browse Source 
SVN revision: 7
This commit is contained in:
ritt
2001-12-21 15:27:46 +00:00
parent 867b0ed78f
commit 74958ba8f6
2 changed files with 0 additions and 8806 deletions
Download Patch File Download Diff File Expand all files Collapse all files
elog.c
-533
View File
@@ -1,533 +0,0 @@
/********************************************************************\
Name: elog.c
Created by: Stefan Ritt
Contents: Electronic logbook utility
$Log$
Revision 1.1 2001/12/21 15:14:04 midas
Initial revision
Revision 1.23 2001/12/21 12:33:04 midas
Fixed bug with single logbook and user authentication, thanks to Glenn Horton-Smith
Revision 1.22 2001/12/05 10:02:50 midas
Fixed -Wall compiler warning
Revision 1.21 2001/12/05 09:58:57 midas
Fixed small bug
Revision 1.20 2001/11/15 11:49:46 midas
Added -u flag for user name/password
Revision 1.19 2001/11/14 15:35:37 midas
Fix error under Cygwin with O_BINARY
Revision 1.18 2001/11/06 15:52:17 midas
Added general attributes
Revision 1.17 2001/10/12 08:40:02 midas
Fixed bug when submitting text files and an additional (garbage) lines was
added
Revision 1.16 2001/06/19 10:55:40 midas
Variable number of attachments, revised attachment editing
Revision 1.15 2001/05/23 13:15:34 midas
Fixed bug with category
Revision 1.14 2001/05/23 13:04:19 midas
Added password functionality
Revision 1.13 2001/05/23 10:48:21 midas
elog can be used with elogd now
Revision 1.12 2000/09/01 15:49:26 midas
Elog is now submitted via mhttpd
Revision 1.1 1999/09/14 15:15:27 midas
Initial revision
\********************************************************************/
#include <stdio.h>
#include <sys/types.h>
#include <fcntl.h>
#include <stdarg.h>
#include <string.h>
#include <stdlib.h>
#ifdef _MSC_VER
#include <windows.h>
#include <io.h>
#else
#include <netdb.h>
#include <netinet/in.h>
#include <sys/socket.h>
#include <sys/time.h>
#include <unistd.h>
#include <signal.h>
#define closesocket(s) close(s)
#ifndef O_BINARY
#define O_BINARY 0
#endif
#endif
typedef int INT;
#define MAX_ATTACHMENTS 10
#define NAME_LENGTH 100
#define MAX_N_ATTR 20
int verbose;
/*------------------------------------------------------------------*/
char *map= "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
void base64_encode(char *s, char *d)
{
unsigned int t, pad;
pad = 3 - strlen(s) % 3;
while (*s)
{
t = (*s++) << 16;
if (*s)
t |= (*s++) << 8;
if (*s)
t |= (*s++) << 0;
*(d+3) = map[t & 63];
t >>= 6;
*(d+2) = map[t & 63];
t >>= 6;
*(d+1) = map[t & 63];
t >>= 6;
*(d+0) = map[t & 63];
d += 4;
}
*d = 0;
while (pad--)
*(--d) = '=';
}
/*------------------------------------------------------------------*/
void sgets(char *string, int size)
{
char *p;
do
{
p = fgets(string, size, stdin);
} while (p == NULL);
if (strlen(p) > 0 && p[strlen(p)-1] == '\n')
p[strlen(p)-1] = 0;
}
/*------------------------------------------------------------------*/
char request[600000], response[10000], content[600000];
INT submit_elog(char *host, int port, char *experiment, char *passwd,
char *uname, char *upwd,
char attrib_name[MAX_N_ATTR][NAME_LENGTH],
char attrib[MAX_N_ATTR][NAME_LENGTH],
int n_attr,
char *text,
char afilename[MAX_ATTACHMENTS][256],
char *buffer[MAX_ATTACHMENTS],
INT buffer_size[MAX_ATTACHMENTS])
/********************************************************************\
Routine: submit_elog
Purpose: Submit an ELog entry
Input:
char *host Host name where ELog server runs
in port ELog server port number
char *passwd Write password
char *uname User name
char *upwd User password
int run Run number
char *attrib_name Attribute names
char *attrib Attribute values
char *text Message text
char afilename[] File names of attachments
char *buffer[] Attachment contents
INT buffer_size[] Size of buffer in bytes
Function value:
EL_SUCCESS Successful completion
\********************************************************************/
{
int status, sock, i, n, header_length, content_length;
struct hostent *phe;
struct sockaddr_in bind_addr;
char host_name[256], boundary[80], str[80], *p;
#if defined( _MSC_VER )
{
WSADATA WSAData;
/* Start windows sockets */
if ( WSAStartup(MAKEWORD(1,1), &WSAData) != 0)
return -1;
}
#endif
/* get local host name */
gethostname(host_name, sizeof(host_name));
phe = gethostbyname(host_name);
if (phe == NULL)
{
perror("Cannot retrieve host name");
return -1;
}
phe = gethostbyaddr(phe->h_addr, sizeof(int), AF_INET);
if (phe == NULL)
{
perror("Cannot retrieve host name");
return -1;
}
/* if domain name is not in host name, hope to get it from phe */
if (strchr(host_name, '.') == NULL)
strcpy(host_name, phe->h_name);
/* create socket */
if ((sock = socket(AF_INET, SOCK_STREAM, 0)) == -1)
{
perror("cannot create socket");
return -1;
}
/* compose remote address */
memset(&bind_addr, 0, sizeof(bind_addr));
bind_addr.sin_family = AF_INET;
bind_addr.sin_addr.s_addr = 0;
bind_addr.sin_port = htons((unsigned short)port);
phe = gethostbyname(host);
if (phe == NULL)
{
perror("cannot get host name");
return -1;
}
memcpy((char *)&(bind_addr.sin_addr), phe->h_addr, phe->h_length);
/* connect to server */
status = connect(sock, (void *) &bind_addr, sizeof(bind_addr));
if (status != 0)
{
printf("Cannot connect to host %s, port %d\n", host, port);
return -1;
}
if (verbose)
printf("Successfully connected to host %s, port %d\n", host, port);
/* compose content */
strcpy(boundary, "---------------------------7d0bf1a60904bc");
strcpy(content, boundary);
strcat(content, "\r\nContent-Disposition: form-data; name=\"cmd\"\r\n\r\nSubmit\r\n");
if (uname[0])
sprintf(content+strlen(content),
"%s\r\nContent-Disposition: form-data; name=\"unm\"\r\n\r\n%s\r\n", boundary, uname);
if (upwd[0])
{
base64_encode(upwd, str);
sprintf(content+strlen(content),
"%s\r\nContent-Disposition: form-data; name=\"upwd\"\r\n\r\n%s\r\n", boundary, str);
}
if (experiment[0])
sprintf(content+strlen(content),
"%s\r\nContent-Disposition: form-data; name=\"exp\"\r\n\r\n%s\r\n", boundary, experiment);
for (i=0 ; i<n_attr ; i++)
sprintf(content+strlen(content),
"%s\r\nContent-Disposition: form-data; name=\"%s\"\r\n\r\n%s\r\n", boundary, attrib_name[i], attrib[i]);
sprintf(content+strlen(content),
"%s\r\nContent-Disposition: form-data; name=\"Text\"\r\n\r\n%s\r\n%s\r\n", boundary, text, boundary);
content_length = strlen(content);
p = content+content_length;
for (i=0 ; i<MAX_ATTACHMENTS ; i++)
if (afilename[i][0])
{
sprintf(p, "Content-Disposition: form-data; name=\"attfile%d\"; filename=\"%s\"\r\n\r\n",
i+1, afilename[i]);
content_length += strlen(p);
p += strlen(p);
memcpy(p, buffer[i], buffer_size[i]);
p += buffer_size[i];
strcpy(p, boundary);
strcat(p, "\r\n");
content_length += buffer_size[i] + strlen(p);
p += strlen(p);
}
/* compose request */
sprintf(request, "POST /%s/ HTTP/1.0\r\n", experiment);
sprintf(request+strlen(request), "Content-Type: multipart/form-data; boundary=%s\r\n", boundary);
sprintf(request+strlen(request), "Host: %s\r\n", host_name);
sprintf(request+strlen(request), "User-Agent: ELOG\r\n");
sprintf(request+strlen(request), "Content-Length: %d\r\n", content_length);
if (passwd[0])
{
base64_encode(passwd, str);
sprintf(request+strlen(request), "Cookie: elog_wpwd=%s\r\n", str);
}
strcat(request, "\r\n");
header_length = strlen(request);
memcpy(request+header_length, content, content_length);
/*
{
FILE *f;
f = fopen("elog.log", "w");
fwrite(request, header_length+content_length, 1, f);
fclose(f);
}
*/
/* send request */
if (verbose)
{
printf("Request sent to host:\n");
puts(request);
}
send(sock, request, header_length+content_length, 0);
/* receive response */
i = recv(sock, response, 10000, 0);
if (i < 0)
{
perror("Cannot receive response");
return -1;
}
/* discard remainder of response */
n = i;
while (i > 0)
{
i = recv(sock, response+n, 10000, 0);
if (i > 0)
n += i;
}
response[n] = 0;
closesocket(sock);
if (verbose)
{
printf("Response received:\n");
puts(response);
}
/* check response status */
if (strstr(response, "302 Found"))
printf("Message successfully transmitted\n");
else if (strstr(response, "Logbook Selection"))
printf("No logbook specified\n\n");
else if (strstr(response, "Enter password"))
printf("Missing or invalid password\n");
else if (strstr(response, "login"))
printf("Missing or invalid user name/password\n");
else
printf("Error transmitting message\n");
return 1;
}
/*------------------------------------------------------------------*/
int main(int argc, char *argv[])
{
char str[1000], text[10000], uname[80], upwd[80];
char host_name[256], logbook[32], textfile[256], password[80];
char *buffer[MAX_ATTACHMENTS], attachment[MAX_ATTACHMENTS][256];
INT att_size[MAX_ATTACHMENTS];
INT i, n, fh, n_att, n_attr, size, port;
char attr_name[MAX_N_ATTR][NAME_LENGTH], attrib[MAX_N_ATTR][NAME_LENGTH];
text[0] = textfile[0] = uname[0] = upwd[0] = 0;
host_name[0] = logbook[0] = password[0] = n_att = n_attr = 0;
port = 80;
for (i=0 ; i<MAX_ATTACHMENTS ; i++)
{
attachment[i][0] = 0;
buffer[i] = NULL;
att_size[i] = 0;
}
/* parse command line parameters */
for (i=1 ; i<argc ; i++)
{
if (argv[i][0] == '-' && argv[i][1] == 'v')
verbose = 1;
else
{
if (argv[i][0] == '-')
{
if (i+1 >= argc || argv[i+1][0] == '-')
goto usage;
if (argv[i][1] == 'h')
strcpy(host_name, argv[++i]);
else if (argv[i][1] == 'p')
port = atoi(argv[++i]);
else if (argv[i][1] == 'l')
strcpy(logbook, argv[++i]);
else if (argv[i][1] == 'w')
strcpy(password, argv[++i]);
else if (argv[i][1] == 'u')
{
strcpy(uname, argv[++i]);
strcpy(upwd, argv[++i]);
}
else if (argv[i][1] == 'a')
{
strcpy(str, argv[++i]);
if (strchr(str, '='))
{
strcpy(attrib[n_attr], strchr(str, '=')+1);
*strchr(str, '=') = 0;
strcpy(attr_name[n_attr], str);
n_attr++;
}
else
{
printf("Error: Attributes must be supplied in the form \"-a <attribute>=<value>\".\n");
return 0;
}
}
else if (argv[i][1] == 'f')
strcpy(attachment[n_att++], argv[++i]);
else if (argv[i][1] == 'm')
strcpy(textfile, argv[++i]);
else
{
usage:
printf("\nusage: elog -h <hostname> [-p port]\n");
printf(" [-l logbook/experiment]\n");
printf(" [-v] for verbose output\n");
printf(" [-w password] write password defined on server\n");
printf(" [-u username password] user name and password\n");
printf(" [-f <attachment>] (up to %d times)\n", MAX_ATTACHMENTS);
printf(" -a <attribute>=<value> (up to %d times)\n", MAX_N_ATTR);
printf(" -m <textfile>] | <text>\n");
printf("\nArguments with blanks must be enclosed in quotes\n");
printf("The elog message can either be submitted on the command line\n");
printf("or in a file with the -m flag. Multiple attributes and attachments\n");
printf("can be supplied\n");
return 0;
}
}
else
strcpy(text, argv[i]);
}
}
if (host_name[0] == 0 ||
n_attr == 0 ||
(text[0] == 0 && textfile[0] == 0))
goto usage;
/*---- open text file ----*/
if (textfile[0])
{
fh = open(textfile, O_RDONLY | O_BINARY);
if (fh < 0)
{
printf("Message file \"%s\" does not exist.\n", textfile);
return 0;
}
size = lseek(fh, 0, SEEK_END);
lseek(fh, 0, SEEK_SET);
if (size > sizeof(text)-1)
{
printf("Message file \"%s\" is too long (%d bytes max).\n", textfile, sizeof(text));
return 0;
}
memset(text, 0, sizeof(text));
i = read(fh, text, size);
if (i < size)
{
printf("Cannot fully read message file \"%s\".\n", textfile);
return 0;
}
close(fh);
}
/*---- open attachment file ----*/
for (i = 0 ; i<MAX_ATTACHMENTS ; i++)
{
if (!attachment[i][0])
break;
fh = open(attachment[i], O_RDONLY | O_BINARY);
if (fh < 0)
{
printf("Attachment file \"%s\" does not exist.\n", attachment[i]);
return 0;
}
att_size[i] = lseek(fh, 0, SEEK_END);
lseek(fh, 0, SEEK_SET);
buffer[i] = malloc(att_size[i]+1);
if (buffer[i] == NULL || att_size[i] > 500*1024)
{
printf("Attachment file \"%s\" is too long (500k max).\n", attachment[i]);
return 0;
}
n = read(fh, buffer[i], att_size[i]);
if (n < att_size[i])
{
printf("Cannot fully read attachment file \"%s\".\n", attachment[i]);
return 0;
}
buffer[i][n] = 0;
close(fh);
}
/* now submit message */
submit_elog(host_name, port, logbook, password,
uname, upwd,
attr_name, attrib, n_attr, text,
attachment, buffer, att_size);
for (i=0 ; i<MAX_ATTACHMENTS ; i++)
if (buffer[i])
free(buffer[i]);
return 1;
}
elogd.c
-8273
View File
File diff suppressed because it is too large Load Diff