Tag Archives: code

download αρχείων με ελληνικά ονόματα

Ήθελα πριν λίγο καιρό να ξεκινήσω ένα μικρό template για να συμπληρώνω κάποια σημεία και να δημιουργείται αυτόματα ένα word έγγραφο, ώστε να μπορώ στη συνέχεια να το τυπώσω όπου θέλω, να συνεχίσω να το επεξεργάζομαι και να το μορφοποιώ. Ξεκίνησα σαν χαρούμενος πληροφορικάριος και κλίκι-κλίκι, άρχισα να γράφω το template το έβαλα σε ένα χώρο, έφτιαξα και μία φόρμα στο web για να συμπληρώνεις τα 2-3 πραγματάκια που χρειάζονται και το τελικό συμπληρωμένο αρχείο το έστελνα για download. Tο δοκίμασα στον chrome που χρησιμοποιώ κυρίως και όλα ήταν μια χαρά. Ευτυχής είπα να το δοκιμάσω και σε Firefox και σε Internet Explorer. Εκεί ήταν που τελείωσε (τόσο σύντομα) το αίσθημα ευτυχίας και τη θέση του πήραν διάφορα κοσμητικά επίθετα. Ο Firefox αποθήκευε μεν το αρχείο με ελληνικά, αλλά δεν έπαιρνε όλο το όνομα, παρά μόνο ότι υπήρχε μέχρι το πρώτο κενό. Ο Internet Explorer έπαιρνε μεν όλο το όνομα, αλλά δεν διαβαζόταν γιατί τα ελληνικά είχαν χαλάσει γιατί τροποποιούσε το όνομα του αρχείου από utf8 encoding που ήταν σε ότι encoding ήθελε. Τελικά με λίγο ψάξιμο κατέληξα στο συμπέρασμα ότι ο κάθε browser έχει τα δικά του βίτσια όχι μόνο ως προς την κατανόηση, τη μορφοποίηση και την εμφάνιση του css, του html και του javascript κώδικα, αλλά ακόμα και στον τρόπο που πρέπει να δίνεις τα ονόματα των αρχείων που θέλεις να στείλεις σαν attachments για download. O κώδικας τελικά από αυτό (σε aspx):

void WriteFile(string filename, string data)
{
    this.Response.ContentType = "application/vnd.openxmlformats-officedocument.wordprocessingml.document; charset=UTF-8";
    this.Response.AddHeader("Content-Disposition", "attachment; filename=" + filename);
    this.Response.Write(data);
}

και αυτό (σε php):

function writeFile($filename, $data)
{
    header('content-type: application/vnd.openxmlformats-officedocument.wordprocessingml.document; charset=UTF-8');
    header("Content-Disposition: attachment; filename=$filename;");
    echo $data;
}

Έγινε αυτό:

void WriteFile(string filename, string data)
{
    this.Response.ContentType = "application/vnd.openxmlformats-officedocument.wordprocessingml.document; charset=UTF-8";

    if (this.Request.Browser.Browser == "Firefox")
    {
        filename = filename.Replace(" ","%20");
        this.Response.AddHeader("Content-Disposition", "attachment; filename*=UTF8''" + filename);
    }
    else
    {
        filename = HttpUtility.UrlEncode(filename).Replace('+', ' ');
        this.Response.AddHeader("Content-Disposition", "attachment; filename=" + filename);
    }

    this.Response.Write(data);
}

και αυτό αντίστοιχα:

function writeFile($filename, $data)
{
    header('content-type: application/vnd.openxmlformats-officedocument.wordprocessingml.document; charset=UTF-8');

    $agent = $_SERVER['HTTP_USER_AGENT'];
    if (strlen(strstr(strtolower($agent), 'firefox')) > 0) {
        $filename = str_replace(' ','%20',$filename);
        header("Content-Disposition: attachment; filename*=UTF8''$filename;");
    }
    else {
        $filename = str_replace('+',' ',urlencode($filename));
        header("Content-Disposition: attachment; filename=$filename;");
    }
    echo $data;
}

Με μερικές δοκιμές, μια λίγο πιο απλοποιημένη μορφή θα μπορούσε να είναι:

void WriteFile(string filename, string data)
{
    if (this.Request.Browser.Browser == "InternetExplorer")
    {
        filename = HttpUtility.UrlEncode(filename).Replace('+', ' ');
    }
    this.Response.ContentType = "application/vnd.openxmlformats-officedocument.wordprocessingml.document; charset=UTF-8";
    this.Response.AddHeader("Content-Disposition", "attachment; filename=\"" + filename + "\";");
    this.Response.Write(data);
}

και

function writeFile($filename, $data)
{
    header('content-type: application/vnd.openxmlformats-officedocument.wordprocessingml.document; charset=UTF-8');
    $agent = $_SERVER['HTTP_USER_AGENT'];
    if (strpos(strtolower($agent),'firefox') == false) {
        $filename = str_replace('+',' ',urlencode($filename));
}
header("Content-Disposition: attachment; filename=\"$filename\";");
echo $data;
}

Ώστε να στέλνει διαφορετικό header – ή διαφορετικά κωδικοποιημένο το όνομα – ανάλογα τον browser, σύμφωνα με τα ιδιαίτερα γούστα τους. Αυτό φυσικά δεν σημαίνει ότι άλλες εκδόσεις των browsers ή “περίεργοι” χαρακτήρες στα ονόματα δεν θέλουν περισσότερη εξειδικευμένη αντιμετώπιση. Όμως δεν έχω browsers – ούτε όρεξη προς το παρόν – να το ψάξω… Ίσως κάποια στιγμή αργότερα.

Δείτε το demo.

Δι@ύγεια OpenData API

Συνεχίζοντας την προσπάθεια σε C# να χρησιμοποιήσω το API της Δι@ύγειας για να πάρω πληροφορίες για το έγγραφο που με ενδιαφέρει και μετά από αρκετές αποτυχημένες δοκιμές είπα να προσπαθήσω με παλιότερο κώδικα που ξέρω ότι δουλεύει.

Οπότε παίρνοντας τον παλιότερο κώδικα που χρησιμοποιούσα για να διαβάζω τον html κώδικα μιας ιστοσελίδας (και να βρίσκω την εξωτερική ip του router μου) έκανα την πρώτη δοκιμή στο http://et.diavgeia.gov.gr/f/all/search/results.php?include_ada=1&field_ada=%CE%924%CE%A9%CE%9B%CE%A7-%CE%A8%CE%9A%CE%92

Ο αρχικός κώδικας ήταν λοιπόν:

public static bool CheckDiavgeiaADA(string ADA)
{
    string url = "http://et.diavgeia.gov.gr/f/all/search/results.php?include_ada=1&field_ada=" + ADA;
    string webPage = GetWebResponse(url);
    return true;
}

public static string GetWebResponse(string url)
{
    try
    {
        HttpWebRequest request = (HttpWebRequest)HttpWebRequest.Create(url);
        request.Method = WebRequestMethods.Http.Get;
        request.CachePolicy = new System.Net.Cache.RequestCachePolicy(System.Net.Cache.RequestCacheLevel.Reload);
        System.Net.HttpWebResponse response = (HttpWebResponse)request.GetResponse();
        Stream dataStream = response.GetResponseStream();
        StreamReader reader = new StreamReader(dataStream);
        String responseText = reader.ReadToEnd();
        reader.Close();
        dataStream.Close();
        response.Close();
        return responseText;
    }
    catch (System.Net.WebException ex)
    {
        System.Diagnostics.Debug.Write(ex.Message);
        return string.Empty;
    }
}

Η πρώτη προσπάθεια ήταν επιτυχής, μπορούσα να διαβάσω το περιεχόμενο της ιστοσελίδας. Μετά ήρθε η ώρα να διαβάσω τη σελίδα όπως λέει το api (http://opendata.diavgeia.gov.gr/api/decisions?ada=Β4ΩΛΧ-ΨΚΒ)

Ο κώδικας έγινε

public static bool CheckDiavgeiaADA(string ADA)
{
    try
    {
        //ADA = System.Web.HttpUtility.UrlEncode(ADA);
        string s = "http://opendata.diavgeia.gov.gr/api/decisions?ada=" + ADA;
        string xmlStr = GetWebResponse(s);
        XmlDocument doc = new XmlDocument();
        doc.LoadXml(xmlStr);
    }
    catch (WebException e)
    {
        System.Diagnostics.Debug.Print(e.ToString());
    }
    return false;
}

και εμφανίστηκε πάλι το γνωστό web exception όπως και πριν. Πλέον όμως ο κώδικας έσκαγε μέσα στην GetWebResponse που σε άλλες σελίδες δουλεύει κανονικά. Έκανα μια δοκιμή σε άλλες σελίδες που επιστρέφουν xml document για να επιβεβαιώσω ότι ο κώδικας αυτός δεν περιορίζεται στο να διαβάζει μόνο text και html documents και πάλι έπαιξε κανονικά.

Άρα κάτι “βιτσιόζικο” έχει ο συγκεκριμένος server της διαύγειας. Είτε είναι πολύ αυστηρός στις απαιτήσεις του για να επιστρέψει ένα σωστό xml document, είτε πολύ “αρρωστιάρικος” και αν δεν του δώσεις το request όπως ακριβώς το χρειάζεται, τα χάνει και “βαράει μπιέλες”. Θα έλεγα μάλλον το δεύτερο, κρίνοντας από το exception stack.

Αφού είχα ήδη την προηγούμενη εμπειρία από τον php κώδικα που δούλεψε προσθέτοντας μερικά επιπλέον directions στο request (για την file_get_contents) είπα να κάνω μια προσπάθεια να βάλω τα ίδια directions μήπως και γίνει κάτι.

Ξεκίνησα προσθέτοντας τη γραμμή

request.KeepAlive = true;

μετά το request.CachePolicy αλλά δεν υπήρξε καμία διαφορά. Σειρά είχε λοιπόν να προστεθεί και το

request.Accept = "*/*";

και το θαύμα έγινε. Η σελίδα μου επέστρεψε το xml document. Μα είναι δυνατόν; Τέλος πάντων αφού έπαιξε…

Ο κώδικας τελικά που παίζει και για τις υπόλοιπες ιστοσελίδες και για το OpenData web service της Δι@ύγειας έγινε:

public static bool CheckDiavgeiaADA(string ADA)
{
    try
    {
        //ADA = System.Web.HttpUtility.UrlEncode(ADA);
        string s = "http://opendata.diavgeia.gov.gr/api/decisions?ada=" + ADA;
        string xmlStr = GetWebResponse(s);
        XmlDocument doc = new XmlDocument();
        doc.LoadXml(xmlStr);
    }
    catch (WebException e)
    {
        System.Diagnostics.Debug.Print(e.ToString());
    }
    return false;
}

public static string GetWebResponse(string url)
{
    try
    {
        HttpWebRequest request = (HttpWebRequest)HttpWebRequest.Create(url);
        request.Method = WebRequestMethods.Http.Get;
        request.CachePolicy = new System.Net.Cache.RequestCachePolicy(System.Net.Cache.RequestCacheLevel.Reload);
        request.Accept = "*/*";
        request.KeepAlive = true;
        System.Net.HttpWebResponse response = (HttpWebResponse)request.GetResponse();
        Stream dataStream = response.GetResponseStream();
        StreamReader reader = new StreamReader(dataStream);
        String responseText = reader.ReadToEnd();
        reader.Close();
        dataStream.Close();
        response.Close();
        return responseText;
    }
    catch (System.Net.WebException ex)
    {
        System.Diagnostics.Debug.Write(ex.Message);
        return string.Empty;
    }
}

…εντάξει όχι ακριβώς έτσι γιατί η function CheckDiavgeiaADA δεν κάνει κάτι χρήσιμο έτσι όπως είναι, αλλά τώρα έχουμε το xml για να πάρουμε τα στοιχεία που μας ενδιαφέρουν.

Δι@ύγεια OpenData API – PHP Version

Δοκίμασα να κάνω μια διαφορετική δοκιμή να χρησιμοποιήσω το OpenData API της δι@ύγειας σε php αυτή τη φορά μήπως και έχω περισσότερη τύχη. Μετά από δοκιμές και άπειρα “500 internal errors” κατέληξα σε αυτά τα δύο κομμάτια κώδικα (μη ρωτήσετε που τα βρήκα, ούτε που θυμάμαι, κάπου στο internet) με όνομα works που δείχνει να δουλεύει και με όνομα fails που αρνείται πεισματικά και επιστρέφει πάντα 500 internal error.

<?php 
$ada = 'Β4ΩΛΧ-ΨΚΒ'; 
$url = 'http://opendata.diavgeia.gov.gr/api/decisions?ada='.urlencode($ada); 

function works($url) 
{ 
   $ch = curl_init(); 
   curl_setopt($ch, CURLOPT_URL,$url); 
   curl_setopt($ch, CURLOPT_HEADER, false); 
   curl_setopt($ch, CURLOPT_RETURNTRANSFER, true); 
   $xmlstr = curl_exec($ch); 
   curl_close($ch); 

   return $xmlstr; 
} 

function fails($url) 
{ 
   $xmlstr = file_get_contents($url); //<-- line 19
   return $xmlstr; 
} 

$xml1 = simplexml_load_string(works($url)); 
$xml2 = simplexml_load_string(fails($url)); 

print_r($xml1); 
print_r($xml2); 
?>

Στο ini to allow_url_fopen το έχω on. Εκανα και το allow_url_include on (που δεν χρειάζεται αλλά να υπάρχει), έβαλα και το user_agent=”PHP” μιας και το ανέφερε και αυτό κάποιος στο documentation της file_get_contents.

Αυτό που παίρνω όταν τρέχω το αρχείο από κονσόλα είναι:

[dva@test ~]# php diavgeia.php 
PHP Warning:  file_get_contents(http://opendata.diavgeia.gov.gr/api/decisions?ada=%CE%924%CE%A9%CE%9B%CE%A7-%CE%A8%CE%9A%CE%92): failed to open stream: HTTP request failed! HTTP/1.1 500 Internal Server Error 
 in /var/www/html/test/xml/diavgeia.php on line 19 
SimpleXMLElement Object 
( 
    [queryInfo] => SimpleXMLElement Object 
        ( 
            [count] => 1 
            [from] => 1 
            [order] => desc 
            [total] => 1 
        ) 
)

Το οποίο δείχνει ότι η function works πέρασε, η fails κράσαρε κάτι στον server της διαύγειας, και μετά τυπώνει το xml που διάβασε η works, (για τη fails δε δείχνει τίποτα).

Δι@ύγεια OpenData API

Προσπαθώ να πάρω μερικές πληροφορίες για συγκεκριμένα έγγραφα από το web service της διαύγειας, σύμφωνα με αυτά που αναφέρονται στο http://opendata.diavgeia.gov.gr/

Εχω λοιπόν τον εξής απλούστατο κώδικα:

try
{
 ADA = "Β4ΩΛΧ-ΨΚΒ";
 //ADA = System.Web.HttpUtility.UrlEncode("Β4ΩΛΧ-ΨΚΒ");
 System.Xml.XmlDocument doc = new System.Xml.XmlDocument();
 string s = "http://opendata.diavgeia.gov.gr/api/decisions?ada=" + ADA;
 doc.Load(s);
}
catch (WebException e)
{
 System.Diagnostics.Debug.Print(e.ToString());
}

To οποίο πάντα (μα πάντα) μου πετάει το εξής web exception:

A first chance exception of type 'System.Net.WebException' occurred in System.Xml.dll
System.Net.WebException: The remote server returned an error: (500) Internal Server Error.
 at System.Net.HttpWebRequest.GetResponse()
 at System.Xml.XmlDownloadManager.GetNonFileStream(Uri uri, ICredentials credentials)
 at System.Xml.XmlDownloadManager.GetStream(Uri uri, ICredentials credentials)
 at System.Xml.XmlUrlResolver.GetEntity(Uri absoluteUri, String role, Type ofObjectToReturn)
 at System.Xml.XmlTextReaderImpl.OpenUrlDelegate(Object xmlResolver)
 at System.Threading.CompressedStack.runTryCode(Object userData)
 at System.Runtime.CompilerServices.RuntimeHelpers.ExecuteCodeWithGuaranteedCleanup(TryCode code, CleanupCode backoutCode, Object userData)
 at System.Threading.CompressedStack.Run(CompressedStack compressedStack, ContextCallback callback, Object state)
 at System.Xml.XmlTextReaderImpl.OpenUrl()
 at System.Xml.XmlTextReaderImpl.Read()
 at System.Xml.XmlLoader.Load(XmlDocument doc, XmlReader reader, Boolean preserveWhitespace)
 at System.Xml.XmlDocument.Load(XmlReader reader)
 at System.Xml.XmlDocument.Load(String filename)
 at Τest.TestADA.ADACheck(String ADA)

Μόλις πάρω internal server error, φαίνεται ότι κρασάρει ολόκληρο το web service στον server της Διαύγειας και δεν μπορώ να δω ούτε από web browser το xml δίνοντας τη διεύθυνση. Απλώς ο web server της διαύγειας απαντάει με το εξής:

HTTP Status 500 -
type Exception report
message
description The server encountered an internal error () that prevented it from fulfilling this request.
exception
javax.servlet.ServletException: Could not resolve view with name 'xmlView' in servlet with name 'diavgeia-api'
 org.springframework.web.servlet.DispatcherServlet.render(DispatcherServlet.java:1042)
 org.springframework.web.servlet.DispatcherServlet.doDispatch(DispatcherServlet.java:798)
 org.springframework.web.servlet.DispatcherServlet.doService(DispatcherServlet.java:716)
 org.springframework.web.servlet.FrameworkServlet.processRequest(FrameworkServlet.java:647)
 org.springframework.web.servlet.FrameworkServlet.doGet(FrameworkServlet.java:552)
 javax.servlet.http.HttpServlet.service(HttpServlet.java:617)
 javax.servlet.http.HttpServlet.service(HttpServlet.java:717)
 org.springframework.web.filter.CharacterEncodingFilter.doFilterInternal(CharacterEncodingFilter.java:88)
 org.springframework.web.filter.OncePerRequestFilter.doFilter(OncePerRequestFilter.java:76)
 org.springframework.security.web.FilterChainProxy$VirtualFilterChain.doFilter(FilterChainProxy.java:344)
 org.springframework.security.web.access.intercept.FilterSecurityInterceptor.invoke(FilterSecurityInterceptor.java:110)
 org.springframework.security.web.access.intercept.FilterSecurityInterceptor.doFilter(FilterSecurityInterceptor.java:84)
 org.springframework.security.web.FilterChainProxy$VirtualFilterChain.doFilter(FilterChainProxy.java:356)
 org.springframework.security.web.access.ExceptionTranslationFilter.doFilter(ExceptionTranslationFilter.java:98)
 org.springframework.security.web.FilterChainProxy$VirtualFilterChain.doFilter(FilterChainProxy.java:356)
 org.springframework.security.web.session.SessionManagementFilter.doFilter(SessionManagementFilter.java:95)
 org.springframework.security.web.FilterChainProxy$VirtualFilterChain.doFilter(FilterChainProxy.java:356)
 org.springframework.security.web.authentication.AnonymousAuthenticationFilter.doFilter(AnonymousAuthenticationFilter.java:79)
 org.springframework.security.web.FilterChainProxy$VirtualFilterChain.doFilter(FilterChainProxy.java:356)
 org.springframework.security.web.servletapi.SecurityContextHolderAwareRequestFilter.doFilter(SecurityContextHolderAwareRequestFilter.java:55)
 org.springframework.security.web.FilterChainProxy$VirtualFilterChain.doFilter(FilterChainProxy.java:356)
 org.springframework.security.web.savedrequest.RequestCacheAwareFilter.doFilter(RequestCacheAwareFilter.java:36)
 org.springframework.security.web.FilterChainProxy$VirtualFilterChain.doFilter(FilterChainProxy.java:356)
 org.springframework.security.web.authentication.www.BasicAuthenticationFilter.doFilter(BasicAuthenticationFilter.java:178)
 org.springframework.security.web.FilterChainProxy$VirtualFilterChain.doFilter(FilterChainProxy.java:356)
 org.springframework.security.web.context.SecurityContextPersistenceFilter.doFilter(SecurityContextPersistenceFilter.java:80)
 org.springframework.security.web.FilterChainProxy$VirtualFilterChain.doFilter(FilterChainProxy.java:356)
 org.springframework.security.web.FilterChainProxy.doFilter(FilterChainProxy.java:150)
 org.springframework.web.filter.DelegatingFilterProxy.invokeDelegate(DelegatingFilterProxy.java:237)
 org.springframework.web.filter.DelegatingFilterProxy.doFilter(DelegatingFilterProxy.java:167)
note The full stack trace of the root cause is available in the Apache Tomcat/6.0.29 logs.
Apache Tomcat/6.0.29

Μετά από λίγο (δεν έχω μετρήσει να δώ αν είναι 1 λεπτό ή 10) συνέρχεται ο web server, μέχρι να ξανατρέξω τον κώδικα και να ξανακρασάρει 😮

Υπάρχει καμιά πρόταση, ώστε να παίρνω τις πληροφορίες που θέλω;
Εχω μπροστά μου κάποιο λάθος και δεν το βλέπω;
Δεν ζητάω πολλά, αυτό που δείχνει η διεύθυνση για παράδειγμα http://opendata.diavgeia.gov.gr/api/decisions?ada=Β4ΩΛΧ-ΨΚΒ

PHP Password generator extension

Και το αντίστοιχο password generator σε php extension για να υπάρχει παντού διαθέσιμο χωρίς να χρειάζεται includes και copy/paste, αλλά και να είναι λίγο ή πολύ πιο γρήγορο από την αντίστοιχη function.

Δημιουργούμε ένα νέο φάκελο passwd και εκεί μέσα δημιουργούμε τα εξής αρχεία:

config.m4

PHP_ARG_ENABLE(passwd, whether to enable passwd support, [ --enable-passwd Enable passwd support])

if test "$PHP_PASSWD" = "yes"; then
  AC_DEFINE(HAVE_PASSWD, 1, [Whether you have passwd])
  PHP_NEW_EXTENSION(passwd, passwd.c, $ext_shared)
fi

INC_CHECK_DIRS="/usr /usr/local"

for i in $INC_CHECK_DIRS ; do
  if test -f $i/include/php/ext/standard/php_rand.h; then
    PHP_ADD_INCLUDE($i/include/php/ext/standard)
    break
  fi
done

passwd.h

#ifndef __PASSWD_H__
#define __PASSWD_H__ 1
#ifndef _WIN32
#include
#endif
#include
#ifdef ZTS
#include "TSRM.h"
#endif

#ifndef BOOL
#define BOOL	short
#endif //BOOL
#ifndef FALSE
#define FALSE	(0)
#endif
#ifndef TRUE
#define TRUE	(1)
#endif

#define PHP_PASSWD_WORLD_VERSION "1.0.0"
#define PHP_PASSWD_WORLD_EXTNAME "passwd"

PHP_FUNCTION(passwd_version);
PHP_FUNCTION(passwd_create);

PHP_MINIT_FUNCTION(passwd);
PHP_MINFO_FUNCTION(passwd);

extern zend_module_entry passwd_module_entry;
#define phpext_passwd_ptr &passwd_module_entry

#endif //__PASSWD_H__

passwd.c

#include "php.h"
#include "php_rand.h"

#ifdef _WIN32
#include "ext/standard/info.h"
#endif

#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include "passwd.h"

#ifndef LONG
typedef long LONG;
#endif

static function_entry passwd_functions[] = {
    PHP_FE(passwd_version, NULL)
    PHP_FE(passwd_create, NULL)
    {NULL, NULL, NULL}
};

zend_module_entry passwd_module_entry = {
#if ZEND_MODULE_API_NO >= 20010901
    STANDARD_MODULE_HEADER,
#endif
    PHP_PASSWD_WORLD_EXTNAME,
    passwd_functions,
    PHP_MINIT(passwd),
    NULL,
    NULL,
    NULL,
    PHP_MINFO(passwd),
#if ZEND_MODULE_API_NO >= 20010901
    PHP_PASSWD_WORLD_VERSION,
#endif
    STANDARD_MODULE_PROPERTIES
};

#ifdef COMPILE_DL_PASSWD  
ZEND_GET_MODULE(passwd)
#endif

char* passwordChars = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890!@#$%^&*()-_=+[]{}\|,<.>/?~;:";
int passwordCharsLen = 0; 

static void ZEND_MODULE_GLOBALS_CTOR_N(passwd)(void *passwd_globals TSRMLS_DC)
{
    //php_srand( time(NULL) );  
}

PHP_MINIT_FUNCTION(passwd)
{
    passwordCharsLen = strlen(passwordChars);
    return SUCCESS;  
}

PHP_MINFO_FUNCTION(passwd)
{
    php_info_print_table_start();
    php_info_print_table_row(2, "passwd", "passwd Functions");
    php_info_print_table_row(2, "passwd_create", "return a random password string");
    php_info_print_table_end();
}

PHP_FUNCTION(passwd_version)
{
    RETURN_STRING(PHP_PASSWD_WORLD_VERSION, 1);
} 

PHP_FUNCTION(passwd_create)
{
    long i, llen, rnd_idx;
    char* tmp;
    if (ZEND_NUM_ARGS() != 1) {
        WRONG_PARAM_COUNT;
    } 
    llen = 8;
    if ((zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "l", &llen) == FAILURE) ||
        (llen < 4) || (llen > 128))
    {
        RETURN_STRING("len should be an integer between 4 and 128", 1);
    } 

    tmp = emalloc(llen+1);

    for (i=0; i<llen; i++)
    {
        rnd_idx = php_rand(TSRMLS_C);
        RAND_RANGE(rnd_idx, 0, passwordCharsLen-1, PHP_RAND_MAX);
        tmp[i] = passwordChars[rnd_idx];
    }
    tmp[i]=(char)0; 
    RETURN_STRING(tmp, 0);
}

Τώρα o αντίστοιχος κώδικας του σχετικού post θα μπορούσε να γίνει ως εξής:

<?php
header('Content-type: text/plain');
    if (isset($_GET['len'])) $len = (int)$_GET['len'];
    if (($len < 4) || ($len > 128)) $len = 8;
    echo passwd_create($len);
?>

PHP password generator

Χρειάστηκα σήμερα έναν password generator, γιατί ήθελα να δώσω passwords σε μια λίστα από emails που έφτιαχνα, και δεν μου πέρασε καν απο το μυαλό ότι το συγκεκριμένο το έχουν χρειαστεί χιλιάδες πριν από μένα. Οπότε ξεκίνησα να γράφω κώδικα και ιδού:

<?php
header('Content-type: text/plain');

function generatePassword($len)
{
    $passwordChars = 'abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890!@#$%^&*()-_=+[]{}\|,<.>/?`~;:';
    $passwordCharsLen = strlen($passwordChars);
    $tmp = '';
    for ($i=0; $i < $len; $i++)
    {
        $x = rand(1, $passwordCharsLen);
        $tmp .= $passwordChars[$x-1];
    }
    return $tmp;
}

    if (isset($_GET['len'])) $len = (int)$_GET['len'];
    if (($len < 4) || ($len > 128)) $len = 8;
    echo generatePassword($len);
?>

Ισως βέβαια το να έψαχνα και να δοκίμαζα τι δουλεύει και τι όχι να μου έπαιρνε περισσότερο χρόνο απ΄ όσο μου πήρε να κάτσω να το γράψω μόνος μου, αλλά δεν πρόκειται να το μάθω ποτέ…

Ελεγχος Εγκυρότητας Α.Φ.Μ. (PHP Version)

Απλώς για να υπάρχει διαθέσιμο σε όποιον το χρειαστεί, η php version του κώδικα που υπάρχει στο άρθρο Ελεγχος Εγκυρότητας Α.Φ.Μ.

<?php
    function CheckAFM($afm)
    {
        if (!preg_match('/^(EL){0,1}[0-9]{9}$/i', $afm))
            return false;
        if (strlen($afm) > 9)
            $afm = substr($afm, 2);

        $remainder = 0;
        $sum = 0;

        for ($nn = 2, $k = 7, $sum = 0; $k >= 0; $k--, $nn += $nn)
            $sum += $nn * ($afm[$k]);
        $remainder = $sum % 11;

        return ($remainder == 10) ? $afm[8] == '0'
                                  : $afm[8] == $remainder;
    }
?>

Εχει μερικές μικροδιαφορές από τις C, C# Versions, αλλά ήταν απαραίτητο αφού προοριζόταν για χρήση σε ιστοσελίδα…

WordPress plugin Quick ‘n’ Dirty

Ηθελε ένας συμφορουμίτης στο freestuff.gr που είμαι μέλος να προσθέσει ένα custom widget για να παίρνει κάποια στατιστικά από ένα άλλο plugin (GD Star Rating) που είχε εγκαταστήσει, και έψαχνε για κάποιον να του φτιάξει ένα νέο plugin που να μπορεί να διαβάσει τα στοιχεία από το υπάρχον και να τα εμφανίζει με κάποιον custom τρόπο που ήθελε.
Το να κάτσεις να κάνεις ένα νέο plugin που να βγαίνει στη sidebar του wordpress blog σαν widget είναι αρκετή δουλειά και έχει και αρκετή χαμαλοδουλειά πέρα από τις λίγες απαιτήσεις γνώσεων που έχει για php και mysql. Continue reading

Highlight C# source code

Επαιζα πριν λίγο καιρό με την php και χρησιμοποιούσα την show_source για να δείχνω χρωματισμένο τον κώδικα. Κάποια στιγμή που προσπάθησα να μεταφράσω τον κώδικα από php σε C# για να δοκιμάσω την ταχύτητα της αντίστοιχης aspx σελίδας, χρειάστηκα πάλι την show_source, αλλά όσο έψαξα δεν βρήκα να δίνει κάτι αντίστοιχο το .net framework. Continue reading

the Prime Source

Τελικά αυτή η άσκηση με τους πρώτους αριθμούς (primes numbers) πρέπει να είναι all time classic!

Γράψτε ένα πρόγραμμα C το οποίο, για δεδεμένο Ν, να βρίσκει, για κάθε Κ που είναι θετικός περιττός ακέραιος και μικρότερος ή ίσος του Ν, την πρώτη ομάδα από Κ συνεχόμενους σύνθετους αριθμούς…

Με έχει ρωτήσει ένα σωρό κόσμος πως μπορούν να αυξήσουν την ταχύτητα στον αλγόριθμο που έχουν (χμ, ας πούμε) φτιάξει. Παρότι υπήρχε ένα προηγούμενο post που είχα γράψει πριν περίπου ενά-μιση χρόνο και νομίζω είναι αρκετά γρήγορο, δεν αρκεί για να είναι γρήγορη και η συνολική λύση της άσκησης. Continue reading