2003-09-17 00:02:55 +04:00
/*
* This file is part of NetSurf , http : //netsurf.sourceforge.net/
* Licensed under the GNU General Public License ,
* http : //www.opensource.org/licenses/gpl-license
2004-02-18 02:38:44 +03:00
* Copyright 2003 , 4 John M Bell < jmb202 @ ecs . soton . ac . uk >
2003-09-17 00:02:55 +04:00
*/
/** \file
* About page creation .
* Dynamically creates the about page , scanning for available plugin information .
*/
# include <assert.h>
# include <string.h>
# include <stdlib.h>
# include <stdio.h>
2003-12-28 02:49:31 +03:00
# include <time.h>
2003-09-17 00:02:55 +04:00
# include <unixlib/local.h> /* for __unixify */
2003-09-27 21:05:25 +04:00
# include "oslib/fileswitch.h"
2003-09-17 00:02:55 +04:00
# include "oslib/osargs.h"
# include "oslib/osfile.h"
# include "oslib/osfind.h"
# include "oslib/osfscontrol.h"
2003-12-31 20:09:03 +03:00
# include "oslib/osgbpb.h"
2004-03-02 21:02:41 +03:00
# include "netsurf/utils/config.h"
# include "netsurf/desktop/browser.h"
# include "netsurf/desktop/netsurf.h"
# include "netsurf/utils/log.h"
# include "netsurf/utils/messages.h"
# include "netsurf/utils/utils.h"
2003-09-17 00:02:55 +04:00
2004-01-05 05:10:59 +03:00
# ifdef WITH_ABOUT
2003-12-28 02:49:31 +03:00
static const char * pabouthdr = " <!DOCTYPE HTML PUBLIC \" -//W3C//DTD HTML 4.01//EN \" \" http://www.w3.org/TR/html4/transitional.dtd \" ><html><head><title>%s</title></head><body bgcolor= \" #f3f3ff \" ><!-- About header --><table border= \" 0 \" width= \" 100%% \" bgcolor= \" #94adff \" cellspacing= \" 2 \" ><tr><td><a href= \" http://netsurf.sf.net \" ><img src= \" file:///%%3CNetSurf$Dir%%3E/About/nslogo \" alt= \" Netsurf logo \" ></a><td><table bgcolor= \" #94adff \" border= \" 0 \" ><tr><td> <tr><td align= \" center \" ><h2>NetSurf %s</h2><tr><td align= \" center \" ><h5>Copyright © 2002, 2003 NetSurf Developers.</h5><tr><td> </table></table><hr> " ; /**< About page header */
2003-09-17 00:02:55 +04:00
static const char * pabtplghd = " <!-- Plugin information --><strong><i>The following plugins are installed on your system:</i></strong><br> <br><table border= \" 0 \" cellspacing= \" 2 \" width= \" 100% \" > " ; /**< Plugin table header */
static const char * paboutpl1 = " <tr valign= \" top \" ><td width= \" 30%% \" ><font size= \" 2 \" ><strong>%s</strong></font></td><td width= \" 70%% \" ><font size= \" 2 \" >%s</font></td></tr><tr><td colspan= \" 2 \" bgcolor= \" #dddddd \" height= \" 1 \" ></td></tr> " ; /**< Plugin entry without image */
static const char * paboutpl2 = " <tr valign= \" top \" ><td width= \" 30%% \" ><font size= \" 2 \" ><strong>%s</strong></font><br><img src= \" %s \" alt= \" %s \" ></td><td width= \" 70%% \" ><font size= \" 2 \" >%s</font></td></tr><tr><td colspan= \" 2 \" bgcolor= \" #dddddd \" height= \" 1 \" ></td></tr> " ; /**< Plugin entry with image (filename=nn) */
2003-09-18 01:43:15 +04:00
static const char * paboutpl3 = " <tr valign= \" top \" ><td width= \" 30%% \" ><font size= \" 2 \" ><strong>%s</strong></font><br><img src= \" %s \" alt= \" %s \" width= \" %d \" height= \" %d \" ></td><td width= \" 70%% \" ><font size= \" 2 \" >%s</font></td></tr><tr><td colspan= \" 2 \" bgcolor= \" #dddddd \" height= \" 1 \" ></td></tr> " ; /**< Plugin entry with image (filename=nnwwwwhhhh) */
2003-09-17 00:02:55 +04:00
static const char * pabtplgft = " </table> " ; /**< Plugin table footer */
2003-12-28 02:49:31 +03:00
static const char * paboutftr = " </div></body></html> " ; /**< Page footer */
2003-09-17 00:02:55 +04:00
/**
2004-03-02 21:02:41 +03:00
* Create the browser about page .
*
* \ param url requested url ( about : . . . )
* \ param callback content callback function , for content_add_user ( )
* \ param p1 user parameter for callback
* \ param p2 user parameter for callback
* \ param width available width
* \ param height available height
* \ return a new content containing the about page
2003-09-17 00:02:55 +04:00
*/
2004-03-02 21:02:41 +03:00
struct content * about_create ( const char * url ,
void ( * callback ) ( content_msg msg , struct content * c , void * p1 ,
void * p2 , const char * error ) ,
void * p1 , void * p2 , unsigned long width , unsigned long height )
{
struct content * c = 0 ;
2003-09-17 00:02:55 +04:00
FILE * fp ;
2003-12-31 20:09:03 +03:00
char * buf , * val , var [ 20 ] , * ptype , * pdetails , * fname , * furl ;
int i , nofiles , j , w , h , size ;
2003-09-27 21:05:25 +04:00
fileswitch_object_type fot ;
2003-09-17 00:02:55 +04:00
os_error * e ;
2004-03-02 21:02:41 +03:00
const char * params [ ] = { 0 } ;
2003-09-17 00:02:55 +04:00
2004-03-02 21:02:41 +03:00
c = content_create ( url ) ;
c - > width = width ;
c - > height = height ;
content_add_user ( c , callback , p1 , p2 ) ;
content_set_type ( c , CONTENT_HTML , " text/html " , params ) ;
2003-09-17 00:02:55 +04:00
/* Page header */
2003-12-28 02:49:31 +03:00
buf = xcalloc ( strlen ( pabouthdr ) + 50 , sizeof ( char ) ) ;
snprintf ( buf , strlen ( pabouthdr ) + 50 , pabouthdr , " About NetSurf " ,
netsurf_version ) ;
2004-03-02 21:02:41 +03:00
content_process_data ( c , buf , strlen ( buf ) ) ;
free ( buf ) ;
2003-09-17 00:02:55 +04:00
/* browser details */
2004-03-02 21:02:41 +03:00
buf = load ( " <NetSurf$Dir>.About.About " ) ;
content_process_data ( c , buf , strlen ( buf ) ) ;
free ( buf ) ;
2003-09-17 00:02:55 +04:00
/* plugin header */
2004-03-02 21:02:41 +03:00
content_process_data ( c , pabtplghd , strlen ( pabtplghd ) ) ;
2003-09-17 00:02:55 +04:00
/* plugins registered */
for ( i = 0 ; i ! = 4096 ; i + + ) {
sprintf ( var , " Plugin$About_%3.3x " , i ) ;
if ( ( val = getenv ( var ) ) ! = 0 ) {
/* Plugin Name */
sprintf ( var , " Plugin$Type_%3.3x " , i ) ;
ptype = getenv ( var ) ;
buf = xcalloc ( strlen ( val ) + 20 , sizeof ( char ) ) ;
/* count files which match <Plugin$About_i>.About* */
sprintf ( buf , " %s.About* " , val ) ;
xosfscontrol_count ( buf , 0 , 0 , 0 , 0 , 0 , 0 , & nofiles ) ;
for ( j = 0 ; j ! = nofiles ; j + + ) {
/* get plugin details */
if ( j = = 0 ) {
sprintf ( buf , " %s.About " , val ) ;
}
else {
sprintf ( buf , " %s.About%2.2d " , val , j ) ;
}
2003-09-27 21:05:25 +04:00
e = xosfile_read_stamped_no_path ( buf , & fot , 0 , 0 , & size , 0 , 0 ) ;
2003-09-17 00:02:55 +04:00
/* If only one file, name can be "About" or "About00" */
2003-09-27 21:05:25 +04:00
if ( e | | ( j = = 0 & & ( int ) fot ! = 1 ) ) {
2003-09-17 00:02:55 +04:00
sprintf ( buf , " %s.About%2.2d " , val , j ) ;
2003-09-27 21:05:25 +04:00
e = xosfile_read_stamped_no_path ( buf , & fot , 0 , 0 , & size , 0 , 0 ) ;
2003-09-17 00:02:55 +04:00
}
/* ok, no file found. try again */
2003-09-27 21:05:25 +04:00
if ( e | | ( int ) fot ! = 1 ) {
2003-09-17 00:02:55 +04:00
continue ;
}
/* read contents of file */
fp = fopen ( buf , " r " ) ;
pdetails = xcalloc ( ( unsigned int ) size + 10 , sizeof ( char ) ) ;
fread ( pdetails , sizeof ( char ) , ( unsigned int ) size , fp ) ;
fclose ( fp ) ;
/* now see if there's an image to display */
sprintf ( buf , " %s.%2.2d " , val , j ) ;
2003-09-27 02:29:02 +04:00
LOG ( ( " buf: %s " , buf ) ) ;
2003-09-27 21:05:25 +04:00
e = xosfile_read_stamped_no_path ( buf , & fot , 0 , 0 , 0 , 0 , 0 ) ;
2003-09-17 00:02:55 +04:00
2003-09-27 21:05:25 +04:00
if ( e | | ( int ) fot ! = 1 ) {
2003-09-17 00:02:55 +04:00
sprintf ( buf , " %s.%2.2d* " , val , j ) ;
2003-09-27 02:29:02 +04:00
LOG ( ( " buf: %s " , buf ) ) ;
2003-09-27 21:05:25 +04:00
e = xosfile_read_stamped_no_path ( buf , & fot , 0 , 0 , 0 , 0 , 0 ) ;
2003-09-17 00:02:55 +04:00
2003-09-27 21:05:25 +04:00
if ( e | | ( int ) fot ! = 1 ) {
2003-09-17 00:02:55 +04:00
/* Type 1: no image file */
furl = xcalloc ( strlen ( paboutpl1 ) + strlen ( ptype ) + strlen ( pdetails ) + 10 , sizeof ( char ) ) ;
sprintf ( furl , paboutpl1 , ptype , pdetails ) ;
2003-09-27 02:29:02 +04:00
LOG ( ( " furl: %s " , furl ) ) ;
2004-03-02 21:02:41 +03:00
content_process_data ( c , furl , strlen ( furl ) ) ;
2003-09-17 00:02:55 +04:00
xfree ( pdetails ) ;
continue ;
}
else {
2004-01-27 01:55:23 +03:00
void * name ;
2003-09-17 00:02:55 +04:00
/* Type 3: image file with name xxwwwwhhhh */
2003-09-27 01:58:11 +04:00
/* get actual file name */
sprintf ( var , " %2.2d* " , j ) ;
2003-09-27 02:29:02 +04:00
LOG ( ( " var: %s " , var ) ) ;
2003-12-31 20:09:03 +03:00
2004-01-27 01:55:23 +03:00
name = ( void * ) xcalloc ( ( unsigned int ) 20 , sizeof ( char ) ) ;
2003-12-31 20:09:03 +03:00
e = xosgbpb_dir_entries ( val , ( osgbpb_string_list * ) name ,
1 , 0 , 255 , var , NULL , NULL ) ;
2003-12-30 20:52:26 +03:00
if ( e ) {
LOG ( ( " %s " , e - > errmess ) ) ;
2003-12-31 20:09:03 +03:00
xfree ( name ) ;
xfree ( pdetails ) ;
continue ;
2003-12-30 20:52:26 +03:00
}
2003-12-31 20:09:03 +03:00
LOG ( ( " fname: %s " , ( char * ) name ) ) ;
sprintf ( buf , " %s.%s " , val , ( char * ) name ) ;
furl = xcalloc ( strlen ( buf ) + 20 , sizeof ( char ) ) ;
2003-09-17 00:02:55 +04:00
/* grab leafname and get width and height */
2003-12-31 20:09:03 +03:00
h = atoi ( ( char * ) name + 6 ) ;
( ( char * ) name ) [ 6 ] = 0 ;
w = atoi ( ( char * ) name + 2 ) ;
xfree ( name ) ;
2003-09-17 00:02:55 +04:00
/* convert to URL */
2003-12-31 20:09:03 +03:00
__unixify ( buf , 0 , furl , strlen ( buf ) + 20 , 0 ) ;
sprintf ( buf , " file://%s " , furl ) ;
2003-09-17 00:02:55 +04:00
xfree ( furl ) ;
2003-12-31 20:09:03 +03:00
LOG ( ( " furl: %s " , buf ) ) ;
furl = xcalloc ( strlen ( paboutpl3 ) + strlen ( ptype ) + strlen ( buf ) +
strlen ( pdetails ) + 10 , sizeof ( char ) ) ;
sprintf ( furl , paboutpl3 , ptype , buf , ptype , w , h , pdetails ) ;
2004-03-02 21:02:41 +03:00
content_process_data ( c , furl , strlen ( furl ) ) ;
2003-09-17 00:02:55 +04:00
xfree ( pdetails ) ;
continue ;
}
}
else {
/* Type 2: image file with name xx */
/* convert RO path to url */
fname = xcalloc ( strlen ( buf ) + 10 , sizeof ( char ) ) ;
furl = xcalloc ( strlen ( buf ) + 10 , sizeof ( char ) ) ;
__unixify ( buf , 0 , furl , strlen ( buf ) + 10 , 0 ) ;
sprintf ( fname , " file://%s " , furl ) ;
xfree ( furl ) ;
furl = xcalloc ( strlen ( paboutpl2 ) + strlen ( ptype ) + strlen ( fname ) + strlen ( pdetails ) + 10 , sizeof ( char ) ) ;
sprintf ( furl , paboutpl2 , ptype , fname , ptype , pdetails ) ;
2004-03-02 21:02:41 +03:00
content_process_data ( c , furl , strlen ( furl ) ) ;
2003-09-17 00:02:55 +04:00
xfree ( fname ) ;
xfree ( pdetails ) ;
}
}
if ( buf ! = 0 ) {
xfree ( buf ) ;
}
}
}
2004-03-02 21:02:41 +03:00
/* plugin footer */
content_process_data ( c , pabtplgft , strlen ( pabtplgft ) ) ;
2003-09-17 00:02:55 +04:00
2004-03-02 21:02:41 +03:00
/* Page footer */
content_process_data ( c , paboutftr , strlen ( paboutftr ) ) ;
2003-09-17 00:02:55 +04:00
2004-03-02 21:02:41 +03:00
content_convert ( c , c - > width , c - > height ) ;
2003-09-17 00:02:55 +04:00
2004-03-02 21:02:41 +03:00
return c ;
2003-09-17 00:02:55 +04:00
}
2004-01-05 05:10:59 +03:00
# ifdef WITH_COOKIES
2003-12-28 02:49:31 +03:00
/**
* Creates the cookie list and stores it in < Wimp $ ScrapDir > . WWW . Netsurf
*/
void cookie_create ( void ) {
FILE * fp ;
int len , count = 0 ;
char * cookies = 0 , * pos ;
char domain [ 256 ] , flag [ 10 ] , path [ 256 ] , secure [ 10 ] ,
exp [ 50 ] , name [ 256 ] , val [ 256 ] ;
unsigned int expiry ;
2003-12-30 19:47:16 +03:00
fp = fopen ( messages_get ( " cookiefile " ) , " r " ) ;
2003-12-28 02:49:31 +03:00
if ( ! fp ) {
LOG ( ( " Failed to open cookie jar " ) ) ;
return ;
}
/* read file length */
fseek ( fp , 0 , SEEK_END ) ;
len = ftell ( fp ) ;
fseek ( fp , 0 , SEEK_SET ) ;
cookies = xcalloc ( ( unsigned int ) len , sizeof ( char ) ) ;
fread ( cookies , ( unsigned int ) len , sizeof ( char ) , fp ) ;
fclose ( fp ) ;
xosfile_create_dir ( " <Wimp$ScrapDir>.WWW " , 77 ) ;
xosfile_create_dir ( " <Wimp$ScrapDir>.WWW.NetSurf " , 77 ) ;
fp = fopen ( " <Wimp$ScrapDir>.WWW.NetSurf.Cookies " , " w+ " ) ;
if ( ! fp ) {
xfree ( cookies ) ;
LOG ( ( " Failed to create file " ) ) ;
return ;
}
fprintf ( fp , pabouthdr , " About NetSurf - Cookies " , netsurf_version ) ;
fprintf ( fp , " <strong><i>The following cookies are stored on your system:</i></strong><div align= \" center \" ><table cellspacing= \" 2 \" cellpadding= \" 2 \" width= \" 100%% \" ><strong><thead><td nowrap>Domain:</td><td nowrap>Flag:</td><td nowrap>Path:</td><td nowrap>Secure:</td><td nowrap>Expiration:</td><td nowrap>Name:</td><td nowrap>Value:</td></thead></strong><tbody> " ) ;
pos = cookies ;
while ( pos ! = ( cookies + len - 1 ) ) {
if ( * pos = = ' # ' ) {
for ( ; * pos ! = ' \n ' ; pos + + ) ;
pos + = 1 ;
continue ;
}
sscanf ( pos , " %s \t %s \t %s \t %s \t %s \t %s \t %s \n " , domain , flag , path , secure ,
exp , name , val ) ;
pos + = ( strlen ( domain ) + strlen ( flag ) + strlen ( path ) + strlen ( secure ) +
strlen ( exp ) + strlen ( name ) + strlen ( val ) + 7 ) ;
sscanf ( exp , " %u " , & expiry ) ;
fprintf ( fp , " <tr%s><td nowrap>%s</td><td nowrap>%s</td><td nowrap>%s</td><td nowrap>%s</td><td nowrap>%s</td><td nowrap>%s</td><td nowrap>%s</td></tr> " , ( count % 2 = = 0 ? " bgcolor= \" #ddddee \" " : " " ) , domain , flag , path , secure ,
( expiry = = 0 ? " Expires on exit " : ctime ( ( time_t * ) & expiry ) ) , name , val ) ;
count + + ;
}
fprintf ( fp , " </tbody></table></div></body></html> " ) ;
fclose ( fp ) ;
xosfile_set_type ( " <Wimp$ScrapDir>.WWW.NetSurf.Cookies " , 0xfaf ) ;
xfree ( cookies ) ;
return ;
}
2004-01-05 05:10:59 +03:00
# endif
2003-12-28 02:49:31 +03:00
/**
* Clean up created files
*/
void about_quit ( void ) {
xosfile_delete ( " <Wimp$ScrapDir>.WWW.NetSurf.About " , 0 , 0 , 0 , 0 , 0 ) ;
2004-02-18 02:38:44 +03:00
# ifdef WITH_COOKIES
2003-12-28 02:49:31 +03:00
xosfile_delete ( " <Wimp$ScrapDir>.WWW.NetSurf.Cookies " , 0 , 0 , 0 , 0 , 0 ) ;
2004-02-18 02:38:44 +03:00
# endif
2003-12-28 02:49:31 +03:00
}
2004-01-05 05:10:59 +03:00
# endif
