static void
dnssdUpdateDNSSDName(int from_callback) /* I - Called from callback? */
{
char webif[1024]; /* Web interface share name */
# ifdef __APPLE__
SCDynamicStoreRef sc; /* Context for dynamic store */
CFDictionaryRef btmm; /* Back-to-My-Mac domains */
CFStringEncoding nameEncoding; /* Encoding of computer name */
CFStringRef nameRef; /* Host name CFString */
char nameBuffer[1024]; /* C-string buffer */
# endif /* __APPLE__ */
/*
* Only share the web interface and printers when non-local listening is
* enabled...
*/
if (!DNSSDPort)
{
/*
* Get the port we use for registrations. If we are not listening on any
* non-local ports, there is no sense sharing local printers via Bonjour...
*/
cupsd_listener_t *lis; /* Current listening socket */
for (lis = (cupsd_listener_t *)cupsArrayFirst(Listeners);
lis;
lis = (cupsd_listener_t *)cupsArrayNext(Listeners))
{
if (httpAddrLocalhost(&(lis->address)))
continue;
DNSSDPort = httpAddrPort(&(lis->address));
break;
}
}
if (!DNSSDPort)
return;
/*
* Get the computer name as a c-string...
*/
# ifdef __APPLE__
sc = SCDynamicStoreCreate(kCFAllocatorDefault, CFSTR("cupsd"), NULL, NULL);
if (sc)
{
/*
* Get the computer name from the dynamic store...
*/
cupsdClearString(&DNSSDComputerName);
if ((nameRef = SCDynamicStoreCopyComputerName(sc, &nameEncoding)) != NULL)
{
if (CFStringGetCString(nameRef, nameBuffer, sizeof(nameBuffer),
kCFStringEncodingUTF8))
{
cupsdLogMessage(CUPSD_LOG_DEBUG,
"Dynamic store computer name is \"%s\".", nameBuffer);
cupsdSetString(&DNSSDComputerName, nameBuffer);
}
CFRelease(nameRef);
}
if (!DNSSDComputerName)
{
/*
* Use the ServerName instead...
*/
cupsdLogMessage(CUPSD_LOG_DEBUG,
"Using ServerName \"%s\" as computer name.", ServerName);
cupsdSetString(&DNSSDComputerName, ServerName);
}
/*
* Get the local hostname from the dynamic store...
*/
cupsdClearString(&DNSSDHostName);
if ((nameRef = SCDynamicStoreCopyLocalHostName(sc)) != NULL)
{
if (CFStringGetCString(nameRef, nameBuffer, sizeof(nameBuffer),
kCFStringEncodingUTF8))
{
cupsdLogMessage(CUPSD_LOG_DEBUG,
"Dynamic store host name is \"%s\".", nameBuffer);
cupsdSetString(&DNSSDHostName, nameBuffer);
}
CFRelease(nameRef);
}
if (!DNSSDHostName)
{
/*
* Use the ServerName instead...
*/
cupsdLogMessage(CUPSD_LOG_DEBUG,
"Using ServerName \"%s\" as host name.", ServerName);
cupsdSetString(&DNSSDHostName, ServerName);
}
/*
* Get any Back-to-My-Mac domains and add them as aliases...
*/
cupsdFreeAliases(DNSSDAlias);
DNSSDAlias = NULL;
btmm = SCDynamicStoreCopyValue(sc, CFSTR("Setup:/Network/BackToMyMac"));
if (btmm && CFGetTypeID(btmm) == CFDictionaryGetTypeID())
{
cupsdLogMessage(CUPSD_LOG_DEBUG, "%d Back to My Mac aliases to add.",
(int)CFDictionaryGetCount(btmm));
CFDictionaryApplyFunction(btmm, dnssdAddAlias, NULL);
}
else if (btmm)
cupsdLogMessage(CUPSD_LOG_ERROR,
"Bad Back to My Mac data in dynamic store!");
else
cupsdLogMessage(CUPSD_LOG_DEBUG, "No Back to My Mac aliases to add.");
if (btmm)
CFRelease(btmm);
CFRelease(sc);
}
else
# endif /* __APPLE__ */
# ifdef HAVE_AVAHI
if (DNSSDClient)
{
const char *host_name = avahi_client_get_host_name(DNSSDClient);
const char *host_fqdn = avahi_client_get_host_name_fqdn(DNSSDClient);
cupsdSetString(&DNSSDComputerName, host_name ? host_name : ServerName);
if (host_fqdn)
cupsdSetString(&DNSSDHostName, host_fqdn);
else if (strchr(ServerName, '.'))
cupsdSetString(&DNSSDHostName, ServerName);
else
cupsdSetStringf(&DNSSDHostName, "%s.local", ServerName);
}
else
# endif /* HAVE_AVAHI */
{
cupsdSetString(&DNSSDComputerName, ServerName);
if (strchr(ServerName, '.'))
cupsdSetString(&DNSSDHostName, ServerName);
else
cupsdSetStringf(&DNSSDHostName, "%s.local", ServerName);
}
/*
* Then (re)register the web interface if enabled...
*/
if (BrowseWebIF)
{
if (DNSSDComputerName)
snprintf(webif, sizeof(webif), "CUPS @ %s", DNSSDComputerName);
else
strlcpy(webif, "CUPS", sizeof(webif));
dnssdDeregisterInstance(&WebIFSrv, from_callback);
dnssdRegisterInstance(&WebIFSrv, NULL, webif, "_http._tcp", "_printer", DNSSDPort, NULL, 1, from_callback);
}
}
PsychError SCREENComputer(void)
{
const char *majorStructFieldNames[]={"macintosh", "windows", "osx" ,"linux", "kern", "hw", "processUserLongName",
"processUserShortName", "consoleUserName", "machineName", "localHostName", "location", "MACAddress", "system" };
const char *kernStructFieldNames[]={"ostype", "osrelease", "osrevision", "version","hostname"};
const char *hwStructFieldNames[]={"machine", "model", "ncpu", "physmem", "usermem", "busfreq", "cpufreq"};
int numMajorStructDimensions=1, numKernStructDimensions=1, numHwStructDimensions=1;
int numMajorStructFieldNames=14, numKernStructFieldNames=5, numHwStructFieldNames=7;
PsychGenericScriptType *kernStruct, *hwStruct, *majorStruct;
//char tempStr[CTL_MAXNAME]; //this seems like a bug in Darwin, CTL_MAXNAME is shorter than the longest name.
char tempStr[256], *ethernetMACStr;
size_t tempIntSize, tempStrSize, tempULongIntSize;
int mib[2];
int tempInt;
unsigned long int tempULongInt;
char *tempStrPtr;
CFStringRef tempCFStringRef;
psych_bool stringSuccess;
int stringLengthChars, ethernetMACStrSizeBytes;
long gestaltResult;
OSErr gestaltError;
// Str255 systemVersionStr, systemVersionStrForward;
int i,strIndex, bcdDigit, lengthSystemVersionString;
long osMajor, osMinor, osBugfix;
char systemVersionStr[256];
//all subfunctions should have these two lines
PsychPushHelp(useString, synopsisString, seeAlsoString);
if(PsychIsGiveHelp()){PsychGiveHelp();return(PsychError_none);};
PsychErrorExit(PsychCapNumOutputArgs(1));
PsychErrorExit(PsychCapNumInputArgs(0));
//fill the major struct
PsychAllocOutStructArray(1, FALSE, numMajorStructDimensions, numMajorStructFieldNames, majorStructFieldNames, &majorStruct);
PsychSetStructArrayDoubleElement("macintosh", 0, 0, majorStruct);
PsychSetStructArrayDoubleElement("windows", 0, 0, majorStruct);
PsychSetStructArrayDoubleElement("linux", 0, 0, majorStruct);
PsychSetStructArrayDoubleElement("osx", 0, 1, majorStruct);
//fill the kern struct and implant it within the major struct
PsychAllocOutStructArray(-1, FALSE, numKernStructDimensions, numKernStructFieldNames, kernStructFieldNames, &kernStruct);
mib[0]=CTL_KERN;
mib[1]=KERN_OSTYPE;
tempStrSize=sizeof(tempStr);
ReportSysctlError(sysctl(mib, 2, tempStr, &tempStrSize, NULL, 0));
PsychSetStructArrayStringElement("ostype", 0, tempStr, kernStruct);
mib[1]=KERN_OSRELEASE;
tempStrSize=sizeof(tempStr);
ReportSysctlError(sysctl(mib, 2, tempStr, &tempStrSize, NULL, 0));
PsychSetStructArrayStringElement("osrelease", 0, tempStr, kernStruct);
mib[1]=KERN_OSREV;
tempIntSize=sizeof(tempInt);
ReportSysctlError(sysctl(mib, 2, &tempInt, &tempIntSize, NULL, 0));
PsychSetStructArrayDoubleElement("osrevision", 0, (double)tempInt, kernStruct);
mib[1]=KERN_VERSION;
tempStrSize=sizeof(tempStr);
ReportSysctlError(sysctl(mib, 2, tempStr, &tempStrSize, NULL, 0));
PsychSetStructArrayStringElement("version", 0, tempStr, kernStruct);
mib[1]=KERN_HOSTNAME;
tempStrSize=sizeof(tempStr);
ReportSysctlError(sysctl(mib, 2, tempStr, &tempStrSize, NULL, 0));
PsychSetStructArrayStringElement("hostname", 0, tempStr, kernStruct);
PsychSetStructArrayStructElement("kern",0, kernStruct, majorStruct);
//fill the hw struct and implant it within the major struct
PsychAllocOutStructArray(-1, FALSE, numHwStructDimensions, numHwStructFieldNames, hwStructFieldNames, &hwStruct);
mib[0]=CTL_HW;
mib[1]=HW_MACHINE;
tempStrSize=sizeof(tempStr);
ReportSysctlError(sysctl(mib, 2, tempStr, &tempStrSize, NULL, 0));
PsychSetStructArrayStringElement("machine", 0, tempStr, hwStruct);
mib[1]=HW_MODEL;
tempStrSize=sizeof(tempStr);
ReportSysctlError(sysctl(mib, 2, tempStr, &tempStrSize, NULL, 0));
PsychSetStructArrayStringElement("model", 0, tempStr, hwStruct);
mib[1]=HW_NCPU;
tempIntSize=sizeof(tempInt);
ReportSysctlError(sysctl(mib, 2, &tempInt, &tempIntSize, NULL, 0));
PsychSetStructArrayDoubleElement("ncpu", 0, (double)tempInt, hwStruct);
mib[1]=HW_MEMSIZE;
long long tempLongInt;
tempULongIntSize=sizeof(tempLongInt);
ReportSysctlError(sysctl(mib, 2, &tempLongInt, &tempULongIntSize, NULL, 0));
PsychSetStructArrayDoubleElement("physmem", 0, (double)tempLongInt, hwStruct);
mib[1]=HW_USERMEM;
tempULongIntSize=sizeof(tempULongInt);
ReportSysctlError(sysctl(mib, 2, &tempULongInt, &tempULongIntSize, NULL, 0));
PsychSetStructArrayDoubleElement("usermem", 0, (double)tempULongInt, hwStruct);
mib[1]=HW_BUS_FREQ;
tempULongIntSize=sizeof(tempULongInt);
ReportSysctlError(sysctl(mib, 2, &tempULongInt, &tempULongIntSize, NULL, 0));
PsychSetStructArrayDoubleElement("busfreq", 0, (double)tempULongInt, hwStruct);
mib[1]=HW_CPU_FREQ;
tempULongIntSize=sizeof(tempULongInt);
ReportSysctlError(sysctl(mib, 2, &tempULongInt, &tempULongIntSize, NULL, 0));
PsychSetStructArrayDoubleElement("cpufreq", 0, (double)tempULongInt, hwStruct);
PsychSetStructArrayStructElement("hw",0, hwStruct, majorStruct);
//fill in the process user, console user and machine name in the root struct.
tempCFStringRef= CSCopyMachineName();
if (tempCFStringRef) {
stringLengthChars=(int) CFStringGetMaximumSizeForEncoding(CFStringGetLength(tempCFStringRef), kCFStringEncodingUTF8);
tempStrPtr=malloc(sizeof(char) * (stringLengthChars+1));
stringSuccess= CFStringGetCString(tempCFStringRef, tempStrPtr, stringLengthChars+1, kCFStringEncodingUTF8);
if(stringSuccess) {
PsychSetStructArrayStringElement("machineName", 0, tempStrPtr, majorStruct);
}
else {
PsychSetStructArrayStringElement("machineName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
free(tempStrPtr);
CFRelease(tempCFStringRef);
}
else {
PsychSetStructArrayStringElement("machineName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
tempCFStringRef= CSCopyUserName(TRUE); //use short name
if (tempCFStringRef) {
stringLengthChars=(int) CFStringGetMaximumSizeForEncoding(CFStringGetLength(tempCFStringRef), kCFStringEncodingUTF8);
tempStrPtr=malloc(sizeof(char) * (stringLengthChars+1));
stringSuccess= CFStringGetCString(tempCFStringRef, tempStrPtr, stringLengthChars+1, kCFStringEncodingUTF8);
if(stringSuccess) {
PsychSetStructArrayStringElement("processUserShortName", 0, tempStrPtr, majorStruct);
}
else {
PsychSetStructArrayStringElement("processUserShortName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
free(tempStrPtr);
CFRelease(tempCFStringRef);
}
else {
PsychSetStructArrayStringElement("processUserShortName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
tempCFStringRef= CSCopyUserName(FALSE); //use long name
if (tempCFStringRef) {
stringLengthChars=(int) CFStringGetMaximumSizeForEncoding(CFStringGetLength(tempCFStringRef), kCFStringEncodingUTF8);
tempStrPtr=malloc(sizeof(char) * (stringLengthChars+1));
stringSuccess= CFStringGetCString(tempCFStringRef, tempStrPtr, stringLengthChars+1, kCFStringEncodingUTF8);
if(stringSuccess) {
PsychSetStructArrayStringElement("processUserLongName", 0, tempStrPtr, majorStruct);
}
else {
PsychSetStructArrayStringElement("processUserLongName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
free(tempStrPtr);
CFRelease(tempCFStringRef);
}
else {
PsychSetStructArrayStringElement("processUserLongName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
tempCFStringRef= SCDynamicStoreCopyConsoleUser(NULL, NULL, NULL);
if (tempCFStringRef) {
stringLengthChars=(int) CFStringGetMaximumSizeForEncoding(CFStringGetLength(tempCFStringRef), kCFStringEncodingUTF8);
tempStrPtr=malloc(sizeof(char) * (stringLengthChars+1));
stringSuccess= CFStringGetCString(tempCFStringRef, tempStrPtr, stringLengthChars+1, kCFStringEncodingUTF8);
if(stringSuccess) {
PsychSetStructArrayStringElement("consoleUserName", 0, tempStrPtr, majorStruct);
}
else {
PsychSetStructArrayStringElement("consoleUserName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
free(tempStrPtr);
CFRelease(tempCFStringRef);
}
else {
PsychSetStructArrayStringElement("consoleUserName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
tempCFStringRef= SCDynamicStoreCopyLocalHostName(NULL);
if (tempCFStringRef) {
stringLengthChars=(int) CFStringGetMaximumSizeForEncoding(CFStringGetLength(tempCFStringRef), kCFStringEncodingUTF8);
tempStrPtr=malloc(sizeof(char) * (stringLengthChars+1));
stringSuccess= CFStringGetCString(tempCFStringRef, tempStrPtr, stringLengthChars+1, kCFStringEncodingUTF8);
if(stringSuccess) {
PsychSetStructArrayStringElement("localHostName", 0, tempStrPtr, majorStruct);
}
else {
PsychSetStructArrayStringElement("localHostName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
free(tempStrPtr);
CFRelease(tempCFStringRef);
}
else {
PsychSetStructArrayStringElement("localHostName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
tempCFStringRef= SCDynamicStoreCopyLocation(NULL);
if (tempCFStringRef) {
stringLengthChars=(int) CFStringGetMaximumSizeForEncoding(CFStringGetLength(tempCFStringRef), kCFStringEncodingUTF8);
tempStrPtr=malloc(sizeof(char) * (stringLengthChars+1));
stringSuccess= CFStringGetCString(tempCFStringRef, tempStrPtr, stringLengthChars+1, kCFStringEncodingUTF8);
if(stringSuccess) {
PsychSetStructArrayStringElement("location", 0, tempStrPtr, majorStruct);
}
else {
PsychSetStructArrayStringElement("location", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
free(tempStrPtr);
CFRelease(tempCFStringRef);
}
else {
PsychSetStructArrayStringElement("location", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
//Add the ethernet MAC address of the primary ethernet interface to the stuct. This can serve as a unique identifier for the computer.
ethernetMACStrSizeBytes=GetPrimaryEthernetAddressStringLengthBytes(TRUE)+1;
ethernetMACStr=(char*) malloc(sizeof(char) * ethernetMACStrSizeBytes);
GetPrimaryEthernetAddressString(ethernetMACStr, TRUE, TRUE);
PsychSetStructArrayStringElement("MACAddress", 0, ethernetMACStr, majorStruct);
free(ethernetMACStr);
//Add the system version string:
Gestalt(gestaltSystemVersionMajor, &osMajor);
Gestalt(gestaltSystemVersionMinor, &osMinor);
Gestalt(gestaltSystemVersionBugFix, &osBugfix);
sprintf(systemVersionStr, "Mac OS %i.%i.%i", osMajor, osMinor, osBugfix);
//embed it in the return struct
PsychSetStructArrayStringElement("system", 0, systemVersionStr, majorStruct);
/*
OLD DEAD Implementation, left for now as a reference...
//Add the system version string:
gestaltError=Gestalt(gestaltSystemVersion, &gestaltResult);
//The result is a four-digit value stored in BCD in the lower 16-bits of the result. There are implicit decimal
// points between the last three digis. For example Mac OS 10.3.6 is:
//
// 0000 0000 0000 0000 0001 0000 0011 0110
// 1 0 3 6
// 1 0. 3. 6
strIndex=0;
//4th digit.
bcdDigit=gestaltResult & 15;
gestaltResult= gestaltResult>>4;
strIndex=strIndex+sprintf(systemVersionStr+strIndex, "%i", bcdDigit);
//decimal point
strIndex=strIndex+sprintf(systemVersionStr+strIndex, "%s", ".");
//3rd digit
bcdDigit=gestaltResult & 15;
gestaltResult= gestaltResult>>4;
strIndex=strIndex+sprintf(systemVersionStr+strIndex, "%i", bcdDigit);
//decimal point
strIndex=strIndex+sprintf(systemVersionStr+strIndex, "%s", ".");
//second digit
//2nd digit.
bcdDigit=gestaltResult & 15;
gestaltResult= gestaltResult>>4;
strIndex=strIndex+sprintf(systemVersionStr+strIndex, "%i", bcdDigit);
//1st digit
bcdDigit=gestaltResult & 15;
gestaltResult= gestaltResult>>4;
strIndex=strIndex+sprintf(systemVersionStr+strIndex, "%i", bcdDigit);
//preface with "Mac OS "
strIndex=strIndex+sprintf(systemVersionStr+strIndex, "%s", " SO caM");
//reverse to make it forward
lengthSystemVersionString=strlen(systemVersionStr);
for(i=0;i<lengthSystemVersionString;i++){
systemVersionStrForward[lengthSystemVersionString-1-i]=systemVersionStr[i];
}
systemVersionStrForward[lengthSystemVersionString]='\0';
//embed it in the return struct
PsychSetStructArrayStringElement("system", 0, systemVersionStrForward, majorStruct);
*/
return(PsychError_none);
}
static void
ptr_query_callback(SCNetworkReachabilityRef target, SCNetworkReachabilityFlags flags, void *info)
{
CFDictionaryRef dict;
CFStringRef name;
CFMutableDictionaryRef newDict;
struct timeval ptrQueryComplete;
struct timeval ptrQueryElapsed;
(void) gettimeofday(&ptrQueryComplete, NULL);
timersub(&ptrQueryComplete, &ptrQueryStart, &ptrQueryElapsed);
my_log(LOG_INFO, "NetBIOS name: ptr query complete%s (query time = %ld.%3.3d)",
(flags & kSCNetworkReachabilityFlagsReachable) ? "" : ", host not found",
ptrQueryElapsed.tv_sec,
ptrQueryElapsed.tv_usec / 1000);
// get network configuration
dict = smb_copy_global_configuration(store);
// use NetBIOS name from network configuration (if available)
name = CFDictionaryGetValue(dict, kSCPropNetSMBNetBIOSName);
if ((name != NULL) && _SC_CFStringIsValidNetBIOSName(name)) {
my_log(LOG_INFO, "NetBIOS name (network configuration) = %@", name);
goto setDict;
}
// use reverse DNS name, if available
name = NULL;
if (flags & kSCNetworkReachabilityFlagsReachable) {
int error_num;
CFArrayRef hosts;
/*
* if [reverse] DNS query was successful
*/
hosts = SCNetworkReachabilityCopyResolvedAddress(target, &error_num);
if (hosts != NULL) {
if (CFArrayGetCount(hosts) > 0) {
CFIndex ptrLen;
CFMutableStringRef ptrName;
CFRange range;
name = CFArrayGetValueAtIndex(hosts, 0);
ptrName = CFStringCreateMutableCopy(NULL, 0, name);
ptrLen = CFStringGetLength(ptrName);
if (CFStringFindWithOptions(ptrName,
CFSTR("."),
CFRangeMake(0, ptrLen),
0,
&range)) {
CFStringDelete(ptrName,
CFRangeMake(range.location, ptrLen - range.location));
}
name = ptrName;
}
CFRelease(hosts);
}
}
if (name != NULL) {
if (_SC_CFStringIsValidNetBIOSName(name)) {
my_log(LOG_INFO, "NetBIOS name (reverse DNS query) = %@", name);
goto setName;
}
CFRelease(name);
}
// try local (multicast DNS) name, if available
name = SCDynamicStoreCopyLocalHostName(store);
if (name != NULL) {
if (_SC_CFStringIsValidNetBIOSName(name)) {
my_log(LOG_INFO, "NetBIOS name (multicast DNS) = %@", name);
goto setName;
}
CFRelease(name);
}
// use "default" name
name = copy_default_name();
if (name != NULL) {
my_log(LOG_INFO, "NetBIOS name (default) = %@", name);
goto setName;
}
goto setDict;
setName :
newDict = CFDictionaryCreateMutableCopy(NULL, 0, dict);
CFDictionarySetValue(newDict, kSCPropNetSMBNetBIOSName, name);
CFRelease(dict);
dict = newDict;
CFRelease(name);
setDict :
// update SMB configuration
smb_set_configuration(store, dict);
CFRelease(dict);
ptr_query_stop();
#ifdef MAIN
CFRunLoopStop(rl);
#endif // MAIN
return;
}
static void
smb_update_configuration(__unused CFRunLoopTimerRef _timer, void *info)
{
CFStringRef address = NULL;
CFDictionaryRef dict;
CFStringRef name;
CFStringRef serviceID = NULL;
SCDynamicStoreRef store = (SCDynamicStoreRef)info;
// get network configuration
dict = smb_copy_global_configuration(store);
// use NetBIOS name from network configuration (if available)
name = CFDictionaryGetValue(dict, kSCPropNetSMBNetBIOSName);
if ((name != NULL) && _SC_CFStringIsValidNetBIOSName(name)) {
my_log(LOG_INFO, "NetBIOS name (network configuration) = %@", name);
goto set;
}
// get primary service ID
serviceID = copy_primary_service(store);
if (serviceID == NULL) {
// if no primary service
goto mDNS;
}
// get DNS name associated with primary IP, if available
address = copy_primary_ip(store, serviceID);
if (address != NULL) {
Boolean ok;
// start reverse DNS query using primary IP address
ok = ptr_query_start(address);
if (ok) {
// if query started
goto done;
}
}
mDNS :
// get local (multicast DNS) name, if available
name = SCDynamicStoreCopyLocalHostName(store);
if (name != NULL) {
if (_SC_CFStringIsValidNetBIOSName(name)) {
CFMutableDictionaryRef newDict;
my_log(LOG_INFO, "NetBIOS name (multicast DNS) = %@", name);
newDict = CFDictionaryCreateMutableCopy(NULL, 0, dict);
CFDictionarySetValue(newDict, kSCPropNetSMBNetBIOSName, name);
CFRelease(dict);
dict = newDict;
CFRelease(name);
goto set;
}
CFRelease(name);
}
// get "default" name
name = copy_default_name();
if (name != NULL) {
CFMutableDictionaryRef newDict;
my_log(LOG_INFO, "NetBIOS name (default) = %@", name);
newDict = CFDictionaryCreateMutableCopy(NULL, 0, dict);
CFDictionarySetValue(newDict, kSCPropNetSMBNetBIOSName, name);
CFRelease(dict);
dict = newDict;
CFRelease(name);
}
set :
// update SMB configuration
smb_set_configuration(store, dict);
done :
if (address != NULL) CFRelease(address);
if (dict != NULL) CFRelease(dict);
if (serviceID != NULL) CFRelease(serviceID);
if (timer != NULL) {
CFRunLoopTimerInvalidate(timer);
CFRelease(timer);
timer = NULL;
}
return;
}
PsychError SCREENComputer(void)
{
const char *majorStructFieldNames[]={"macintosh", "windows", "osx" ,"linux", "kern", "hw", "processUserLongName",
"processUserShortName", "consoleUserName", "machineName", "localHostName", "location", "MACAddress", "system", "gstreamer", "supported" };
const char *kernStructFieldNames[]={"ostype", "osrelease", "osrevision", "version","hostname"};
const char *hwStructFieldNames[]={"machine", "model", "ncpu", "physmem", "usermem", "busfreq", "cpufreq"};
int numMajorStructDimensions=-1, numKernStructDimensions=-1, numHwStructDimensions=-1;
int numMajorStructFieldNames=16, numKernStructFieldNames=5, numHwStructFieldNames=7;
PsychGenericScriptType *kernStruct, *hwStruct, *majorStruct;
//char tempStr[CTL_MAXNAME]; //this seems like a bug in Darwin, CTL_MAXNAME is shorter than the longest name.
char tempStr[256], *ethernetMACStr;
size_t tempIntSize, tempStrSize, tempULongIntSize;
int mib[2];
int tempInt;
psych_uint64 tempULongInt;
char *tempStrPtr;
CFStringRef tempCFStringRef;
psych_bool stringSuccess;
int stringLengthChars, ethernetMACStrSizeBytes;
long gestaltResult;
OSErr gestaltError;
int i,strIndex, bcdDigit, lengthSystemVersionString;
int osMajor, osMinor, osBugfix;
char systemVersionStr[256];
//all subfunctions should have these two lines
PsychPushHelp(useString, synopsisString, seeAlsoString);
if(PsychIsGiveHelp()){PsychGiveHelp();return(PsychError_none);};
PsychErrorExit(PsychCapNumOutputArgs(1));
PsychErrorExit(PsychCapNumInputArgs(0));
//fill the major struct
PsychAllocOutStructArray(1, FALSE, numMajorStructDimensions, numMajorStructFieldNames, majorStructFieldNames, &majorStruct);
PsychSetStructArrayDoubleElement("macintosh", 0, 0, majorStruct);
PsychSetStructArrayDoubleElement("windows", 0, 0, majorStruct);
PsychSetStructArrayDoubleElement("linux", 0, 0, majorStruct);
PsychSetStructArrayDoubleElement("osx", 0, 1, majorStruct);
// Official support status:
PsychSetStructArrayStringElement("supported", 0, (char*) PsychSupportStatus(), majorStruct);
// GStreamer availability and rough version:
#if defined(PTB_USE_GSTREAMER)
#if GST_CHECK_VERSION(1,0,0)
PsychSetStructArrayDoubleElement("gstreamer", 0, 1 * 10000 + 0 * 100 + 0, majorStruct);
#else
PsychSetStructArrayDoubleElement("gstreamer", 0, 0 * 10000 + 10 * 100 + 0, majorStruct);
#endif
#else
PsychSetStructArrayDoubleElement("gstreamer", 0, 0, majorStruct);
#endif
//fill the kern struct and implant it within the major struct
PsychAllocOutStructArray(-1, FALSE, numKernStructDimensions, numKernStructFieldNames, kernStructFieldNames, &kernStruct);
mib[0]=CTL_KERN;
mib[1]=KERN_OSTYPE;
tempStrSize=sizeof(tempStr);
ReportSysctlError(sysctl(mib, 2, tempStr, &tempStrSize, NULL, 0));
PsychSetStructArrayStringElement("ostype", 0, tempStr, kernStruct);
mib[1]=KERN_OSRELEASE;
tempStrSize=sizeof(tempStr);
ReportSysctlError(sysctl(mib, 2, tempStr, &tempStrSize, NULL, 0));
PsychSetStructArrayStringElement("osrelease", 0, tempStr, kernStruct);
mib[1]=KERN_OSREV;
tempIntSize=sizeof(tempInt);
ReportSysctlError(sysctl(mib, 2, &tempInt, &tempIntSize, NULL, 0));
PsychSetStructArrayDoubleElement("osrevision", 0, (double)tempInt, kernStruct);
mib[1]=KERN_VERSION;
tempStrSize=sizeof(tempStr);
ReportSysctlError(sysctl(mib, 2, tempStr, &tempStrSize, NULL, 0));
PsychSetStructArrayStringElement("version", 0, tempStr, kernStruct);
mib[1]=KERN_HOSTNAME;
tempStrSize=sizeof(tempStr);
ReportSysctlError(sysctl(mib, 2, tempStr, &tempStrSize, NULL, 0));
PsychSetStructArrayStringElement("hostname", 0, tempStr, kernStruct);
PsychSetStructArrayStructElement("kern",0, kernStruct, majorStruct);
//fill the hw struct and implant it within the major struct
PsychAllocOutStructArray(-1, FALSE, numHwStructDimensions, numHwStructFieldNames, hwStructFieldNames, &hwStruct);
mib[0]=CTL_HW;
mib[1]=HW_MACHINE;
tempStrSize=sizeof(tempStr);
ReportSysctlError(sysctl(mib, 2, tempStr, &tempStrSize, NULL, 0));
PsychSetStructArrayStringElement("machine", 0, tempStr, hwStruct);
mib[1]=HW_MODEL;
tempStrSize=sizeof(tempStr);
ReportSysctlError(sysctl(mib, 2, tempStr, &tempStrSize, NULL, 0));
PsychSetStructArrayStringElement("model", 0, tempStr, hwStruct);
mib[1]=HW_NCPU;
tempIntSize=sizeof(tempInt);
ReportSysctlError(sysctl(mib, 2, &tempInt, &tempIntSize, NULL, 0));
PsychSetStructArrayDoubleElement("ncpu", 0, (double)tempInt, hwStruct);
mib[1]=HW_MEMSIZE;
tempULongIntSize=sizeof(tempULongInt);
tempULongInt = 0;
ReportSysctlError(sysctl(mib, 2, &tempULongInt, &tempULongIntSize, NULL, 0));
PsychSetStructArrayDoubleElement("physmem", 0, (double)tempULongInt, hwStruct);
mib[1]=HW_USERMEM;
tempULongIntSize=sizeof(tempULongInt);
tempULongInt = 0;
ReportSysctlError(sysctlbyname("hw.usermem", &tempULongInt, &tempULongIntSize, NULL, 0));
PsychSetStructArrayDoubleElement("usermem", 0, (double)tempULongInt, hwStruct);
mib[1]=HW_BUS_FREQ;
tempULongIntSize=sizeof(tempULongInt);
tempULongInt = 0;
ReportSysctlError(sysctlbyname("hw.busfrequency", &tempULongInt, &tempULongIntSize, NULL, 0));
PsychSetStructArrayDoubleElement("busfreq", 0, (double)tempULongInt, hwStruct);
mib[1]=HW_CPU_FREQ;
tempULongIntSize=sizeof(tempULongInt);
tempULongInt = 0;
ReportSysctlError(sysctlbyname("hw.cpufrequency", &tempULongInt, &tempULongIntSize, NULL, 0));
PsychSetStructArrayDoubleElement("cpufreq", 0, (double)tempULongInt, hwStruct);
PsychSetStructArrayStructElement("hw",0, hwStruct, majorStruct);
//fill in the process user, console user and machine name in the root struct.
tempCFStringRef = SCDynamicStoreCopyComputerName(NULL, NULL);
if (tempCFStringRef) {
stringLengthChars=(int) CFStringGetMaximumSizeForEncoding(CFStringGetLength(tempCFStringRef), kCFStringEncodingASCII);
tempStrPtr=malloc(sizeof(char) * (stringLengthChars+1));
stringSuccess= CFStringGetCString(tempCFStringRef, tempStrPtr, stringLengthChars+1, kCFStringEncodingASCII);
if(stringSuccess) {
PsychSetStructArrayStringElement("machineName", 0, tempStrPtr, majorStruct);
}
else {
PsychSetStructArrayStringElement("machineName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
free(tempStrPtr);
CFRelease(tempCFStringRef);
}
else {
PsychSetStructArrayStringElement("machineName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
struct passwd* thisUser = getpwuid(getuid());
if (thisUser) {
PsychSetStructArrayStringElement("processUserShortName", 0, thisUser->pw_name, majorStruct);
}
else {
PsychSetStructArrayStringElement("processUserShortName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
PsychSetStructArrayStringElement("processUserLongName", 0, PsychCocoaGetFullUsername(), majorStruct);
tempCFStringRef= SCDynamicStoreCopyConsoleUser(NULL, NULL, NULL);
if (tempCFStringRef) {
stringLengthChars=(int) CFStringGetMaximumSizeForEncoding(CFStringGetLength(tempCFStringRef), kCFStringEncodingASCII);
tempStrPtr=malloc(sizeof(char) * (stringLengthChars+1));
stringSuccess= CFStringGetCString(tempCFStringRef, tempStrPtr, stringLengthChars+1, kCFStringEncodingASCII);
if(stringSuccess) {
PsychSetStructArrayStringElement("consoleUserName", 0, tempStrPtr, majorStruct);
}
else {
PsychSetStructArrayStringElement("consoleUserName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
free(tempStrPtr);
CFRelease(tempCFStringRef);
}
else {
PsychSetStructArrayStringElement("consoleUserName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
tempCFStringRef= SCDynamicStoreCopyLocalHostName(NULL);
if (tempCFStringRef) {
stringLengthChars=(int) CFStringGetMaximumSizeForEncoding(CFStringGetLength(tempCFStringRef), kCFStringEncodingASCII);
tempStrPtr=malloc(sizeof(char) * (stringLengthChars+1));
stringSuccess= CFStringGetCString(tempCFStringRef, tempStrPtr, stringLengthChars+1, kCFStringEncodingASCII);
if(stringSuccess) {
PsychSetStructArrayStringElement("localHostName", 0, tempStrPtr, majorStruct);
}
else {
PsychSetStructArrayStringElement("localHostName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
free(tempStrPtr);
CFRelease(tempCFStringRef);
}
else {
PsychSetStructArrayStringElement("localHostName", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
tempCFStringRef= SCDynamicStoreCopyLocation(NULL);
if (tempCFStringRef) {
stringLengthChars=(int) CFStringGetMaximumSizeForEncoding(CFStringGetLength(tempCFStringRef), kCFStringEncodingASCII);
tempStrPtr=malloc(sizeof(char) * (stringLengthChars+1));
stringSuccess= CFStringGetCString(tempCFStringRef, tempStrPtr, stringLengthChars+1, kCFStringEncodingASCII);
if(stringSuccess) {
PsychSetStructArrayStringElement("location", 0, tempStrPtr, majorStruct);
}
else {
PsychSetStructArrayStringElement("location", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
free(tempStrPtr);
CFRelease(tempCFStringRef);
}
else {
PsychSetStructArrayStringElement("location", 0, "UNKNOWN! QUERY FAILED DUE TO EMPTY OR PROBLEMATIC NAME.", majorStruct);
}
//Add the ethernet MAC address of the primary ethernet interface to the stuct. This can serve as a unique identifier for the computer.
ethernetMACStrSizeBytes=GetPrimaryEthernetAddressStringLengthBytes(TRUE)+1;
ethernetMACStr=(char*) malloc(sizeof(char) * ethernetMACStrSizeBytes);
GetPrimaryEthernetAddressString(ethernetMACStr, TRUE, TRUE);
PsychSetStructArrayStringElement("MACAddress", 0, ethernetMACStr, majorStruct);
free(ethernetMACStr);
//Add the system version string:
PsychCocoaGetOSXVersion(&osMajor, &osMinor, &osBugfix);
sprintf(systemVersionStr, "Mac OS %i.%i.%i", osMajor, osMinor, osBugfix);
//embed it in the return struct
PsychSetStructArrayStringElement("system", 0, systemVersionStr, majorStruct);
return(PsychError_none);
}
